# HG changeset patch
# User jwe
# Date 1169176482 0
# Node ID b317fc1b21cc3c98afa622325984167294c113a6
# Parent  e154732e00b7e04faa9fef62ea8ceb758dbab2e3
[project @ 2007-01-19 03:14:42 by jwe]

diff -r e154732e00b7 -r b317fc1b21cc scripts/ChangeLog
--- a/scripts/ChangeLog	Fri Jan 19 03:11:24 2007 +0000
+++ b/scripts/ChangeLog	Fri Jan 19 03:14:42 2007 +0000
@@ -1,6 +1,7 @@
 2007-01-18  Søren Hauberg  <hauberg@gmail.com>
 
 	* pkg/pkg.m (create_pkgadddel): Call fullfile with nm, not "nm".
+	(configure_make): Use fullfile instead of concatenating with "/".
 
 2007-01-10  Baylis Shanks  <bshanks3@hotmail.com>
 
diff -r e154732e00b7 -r b317fc1b21cc scripts/pkg/pkg.m
--- a/scripts/pkg/pkg.m	Fri Jan 19 03:11:24 2007 +0000
+++ b/scripts/pkg/pkg.m	Fri Jan 19 03:14:42 2007 +0000
@@ -592,8 +592,8 @@
 
 function configure_make (desc, packdir)   
 	## Perform ./configure, make, make install in "src"
-    if (exist([packdir "src"], "dir"))
-        src = [packdir "src/"];
+    if (exist(fullfile(packdir, "src"), "dir"))
+        src = fullfile(packdir, "src");
         ## configure
         if (exist(fullfile(src, "configure"), "file"))
             [status, output] = system(["cd " src " ;./configure --prefix=" desc.dir]);
@@ -640,12 +640,13 @@
             oct = dir(fullfile(src, "*.oct"));
             filenames = "";
             if (length(m) > 0)
-                filenames = sprintf([src "%s "], m.name);
+                filenames = sprintf(fullfile(src, "%s "), m.name);
             endif
             if (length(oct) > 0)
-                filenames = [filenames " " sprintf([src "%s "], oct.name)];
+                filenames = [filenames " " sprintf(fullfile(src, "%s "), oct.name)];
             endif
         endif
+        filenames = split_by(filenames, " ");
             
         if (!all(isspace(filenames)))
             mkdir(instdir);