Mercurial > emacs
diff lisp/eshell/esh-maint.el @ 33020:e21feeab77fb
See ChangeLog
author | John Wiegley <johnw@newartisans.com> |
---|---|
date | Sun, 29 Oct 2000 05:18:48 +0000 |
parents | 8e57189d61b4 |
children | 67b464da13ec |
line wrap: on
line diff
--- a/lisp/eshell/esh-maint.el Sun Oct 29 04:56:45 2000 +0000 +++ b/lisp/eshell/esh-maint.el Sun Oct 29 05:18:48 2000 +0000 @@ -48,7 +48,7 @@ ;; (interactive) ;; (require 'autoload) ;; (setq generated-autoload-file -;; (expand-file-name (car command-line-args-left))) +;; (expand-file-name (car command-line-args-left))) ;; (setq command-line-args-left (cdr command-line-args-left)) ;; (batch-update-autoloads)) @@ -65,23 +65,23 @@ ;; Core Functionality\n") ;; (eshell-for module ;; (sort (eshell-subgroups 'eshell) -;; (function -;; (lambda (a b) -;; (string-lessp (symbol-name a) -;; (symbol-name b))))) +;; (function +;; (lambda (a b) +;; (string-lessp (symbol-name a) +;; (symbol-name b))))) ;; (insert (format "* %-34s" -;; (concat (get module 'custom-tag) "::")) -;; (symbol-name module) ".\n")) +;; (concat (get module 'custom-tag) "::")) +;; (symbol-name module) ".\n")) ;; (insert "\nOptional Functionality\n") ;; (eshell-for module ;; (sort (eshell-subgroups 'eshell-module) -;; (function -;; (lambda (a b) -;; (string-lessp (symbol-name a) -;; (symbol-name b))))) +;; (function +;; (lambda (a b) +;; (string-lessp (symbol-name a) +;; (symbol-name b))))) ;; (insert (format "* %-34s" -;; (concat (get module 'custom-tag) "::")) -;; (symbol-name module) ".\n")) +;; (concat (get module 'custom-tag) "::")) +;; (symbol-name module) ".\n")) ;; (insert "@end menu\n")) ;; (defun eshell-make-texi () @@ -91,27 +91,27 @@ ;; (require 'texidoc) ;; (require 'pcomplete) ;; (apply 'texidoc-files 'eshell-generate-main-menu "eshell.doci" -;; (append -;; (list "eshell.el") -;; (sort (mapcar -;; (function -;; (lambda (sym) -;; (let ((name (symbol-name sym))) -;; (if (string-match "\\`eshell-\\(.*\\)" name) -;; (setq name (concat "esh-" (match-string 1 name)))) -;; (concat name ".el")))) -;; (eshell-subgroups 'eshell)) -;; 'string-lessp) -;; (sort (mapcar -;; (function -;; (lambda (sym) -;; (let ((name (symbol-name sym))) -;; (if (string-match "\\`eshell-\\(.*\\)" name) -;; (setq name (concat "em-" (match-string 1 name)))) -;; (concat name ".el")))) -;; (eshell-subgroups 'eshell-module)) -;; 'string-lessp) -;; (list "eshell.texi")))) +;; (append +;; (list "eshell.el") +;; (sort (mapcar +;; (function +;; (lambda (sym) +;; (let ((name (symbol-name sym))) +;; (if (string-match "\\`eshell-\\(.*\\)" name) +;; (setq name (concat "esh-" (match-string 1 name)))) +;; (concat name ".el")))) +;; (eshell-subgroups 'eshell)) +;; 'string-lessp) +;; (sort (mapcar +;; (function +;; (lambda (sym) +;; (let ((name (symbol-name sym))) +;; (if (string-match "\\`eshell-\\(.*\\)" name) +;; (setq name (concat "em-" (match-string 1 name)))) +;; (concat name ".el")))) +;; (eshell-subgroups 'eshell-module)) +;; 'string-lessp) +;; (list "eshell.texi")))) ;; (defun eshell-make-readme () ;; "Make the README file from eshell.el."