Parent Directory | Revision Log | Patch
revision 1.17 by pj, Mon Jul 16 12:22:58 2001 UTC | revision 1.18 by rms, Wed Sep 18 16:01:21 2002 UTC | |
---|---|---|
# | Line 86 Usage: emacs -batch -l ./cus-dep.el -f c | Line 86 Usage: emacs -batch -l ./cus-dep.el -f c |
86 | (let ((members (get symbol 'custom-group)) | (let ((members (get symbol 'custom-group)) |
87 | item where found) | item where found) |
88 | (when members | (when members |
89 | ;; So x and no-x builds won't differ. | |
90 | (setq members (sort (copy-sequence members) 'string<)) | |
91 | (while members | (while members |
92 | (setq item (car (car members)) | (setq item (car (car members)) |
93 | members (cdr members) | members (cdr members) |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |