changeset 10401:6d1e49abf95f

pkg/pkg.m (write_index): include classes in autogenerated INDEX files
author Soren Hauberg <hauberg@gmail.com>
date Fri, 05 Mar 2010 14:38:32 -0800
parents b14fd5116c29
children 9f2bf537a651 69ecfbffcf4f
files scripts/ChangeLog scripts/pkg/pkg.m
diffstat 2 files changed, 19 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/ChangeLog	Fri Mar 05 14:29:47 2010 -0800
+++ b/scripts/ChangeLog	Fri Mar 05 14:38:32 2010 -0800
@@ -1,3 +1,7 @@
+2010-03-05  Soren Hauberg  <hauberg@gmail.com>
+
+	* pkg/pkg.m (write_index): include classes in autogenerated INDEX files.
+
 2010-03-05  Soren Hauberg  <hauberg@gmail.com>
 
 	* plot/fplot.m: Ensure that 'limits' is a 2 or 4 vector, and that 'fn' is a
--- a/scripts/pkg/pkg.m	Fri Mar 05 14:29:47 2010 -0800
+++ b/scripts/pkg/pkg.m	Fri Mar 05 14:38:32 2010 -0800
@@ -1767,6 +1767,21 @@
     error ("couldn't read directory %s: %s", dir, msg);
   endif
 
+  ## Get classes in dir
+  class_idx = strmatch ("@", files);
+  for k = 1:length (class_idx)
+    class_name = files {class_idx (k)};
+    class_dir = fullfile (dir, class_name);
+    if (exist (class_dir, "dir"))
+      [files2, err, msg] = readdir (class_dir);
+      if (err)
+        error ("couldn't read directory %s: %s", class_dir, msg);
+      endif
+      files2 = strcat (class_name, filesep (), files2);
+      files = [files; files2];    
+    endif
+  endfor
+
   ## Check for architecture dependent files.
   tmpdir = getarchdir (desc);
   if (exist (tmpdir, "dir"))