]> code.delx.au - gnu-emacs/blobdiff - lisp/find-lisp.el
New icons for debugger.
[gnu-emacs] / lisp / find-lisp.el
index c11322439637fa12383356a01f2312d76de6ed6f..937a82348f3d74df271eaa6f6f4fd4c9b6b9aa0e 100644 (file)
@@ -1,9 +1,9 @@
-;;; find-lisp.el --- Emulation of find in Emacs Lisp
+;;; find-lisp.el --- emulation of find in Emacs Lisp
 
-;; Author:  Peter Breton
+;; Author: Peter Breton
 ;; Created: Fri Mar 26 1999
 ;; Keywords: unix
-;; Time-stamp: <2000-10-04 00:17:29 pbreton>
+;; Time-stamp: <2001-07-16 12:42:35 pavel>
 
 ;; Copyright (C) 1999, 2000 Free Software Foundation, Inc.
 
@@ -162,6 +162,7 @@ It is a function which takes two arguments, the directory and its parent."
 ;; Find-dired all in Lisp
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
+;;;###autoload
 (defun find-lisp-find-dired (dir regexp)
   "Find files in DIR, matching REGEXP."
   (interactive "DFind files in directory: \nsMatching regexp: ")
@@ -173,6 +174,7 @@ It is a function which takes two arguments, the directory and its parent."
      "*Find Lisp Dired*")))
 
 ;; Just the subdirectories
+;;;###autoload
 (defun find-lisp-find-dired-subdirectories (dir)
   "Find all subdirectories of DIR."
   (interactive "DFind subdirectories of directory: ")
@@ -276,6 +278,7 @@ It is a function which takes two arguments, the directory and its parent."
     (goto-char (point-min))
     (dired-goto-next-file)))
 
+;;;###autoload
 (defun find-lisp-find-dired-filter (regexp)
   "Change the filter on a find-lisp-find-dired buffer to REGEXP."
   (interactive "sSet filter to regexp: ")
@@ -353,8 +356,8 @@ It is a function which takes two arguments, the directory and its parent."
 
 (provide 'find-lisp)
 
-;;; find-lisp.el ends here
-
 ;; Local Variables:
 ;; autocompile: t
 ;; End:
+
+;;; find-lisp.el ends here