Mercurial > octave-nkf
diff scripts/pkg/pkg.m @ 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 | 956eab916c86 |
| children | 95c3e38098bf |
line wrap: on
line diff
--- 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"))