Mercurial > emacs
comparison lisp/battery.el @ 75139:685bae49b575
(battery-search-for-one-match-in-files): Fix typo in docstring.
author | Juanma Barranquero <lekktu@gmail.com> |
---|---|
date | Mon, 08 Jan 2007 23:00:24 +0000 |
parents | 294b1de9ac5f |
children | b01847d9a51b |
comparison
equal
deleted
inserted
replaced
75138:4babd71f8620 | 75139:685bae49b575 |
---|---|
453 (or (cdr (assoc char alist)) "")))) | 453 (or (cdr (assoc char alist)) "")))) |
454 format t t)) | 454 format t t)) |
455 | 455 |
456 (defun battery-search-for-one-match-in-files (files regexp match-num) | 456 (defun battery-search-for-one-match-in-files (files regexp match-num) |
457 "Search REGEXP in the content of the files listed in FILES. | 457 "Search REGEXP in the content of the files listed in FILES. |
458 If a match occured, return the parenthesized expression numbered by | 458 If a match occurred, return the parenthesized expression numbered by |
459 MATCH-NUM in the match. Otherwise, return nil." | 459 MATCH-NUM in the match. Otherwise, return nil." |
460 (with-temp-buffer | 460 (with-temp-buffer |
461 (catch 'found | 461 (catch 'found |
462 (dolist (file files) | 462 (dolist (file files) |
463 (and (ignore-errors (insert-file-contents file nil nil nil 'replace)) | 463 (and (ignore-errors (insert-file-contents file nil nil nil 'replace)) |