Mercurial > emacs
comparison lisp/eshell/esh-mode.el @ 62332:18090a2d479a
(eshell-find-tag): Use with-no-warnings.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 14 May 2005 14:03:31 +0000 |
| parents | 9e498efab42b |
| children | 8cd0894899dc f042e7c0fe20 |
comparison
equal
deleted
inserted
replaced
| 62331:551071b66329 | 62332:18090a2d479a |
|---|---|
| 515 (interactive) | 515 (interactive) |
| 516 (require 'etags) | 516 (require 'etags) |
| 517 (let ((inhibit-read-only t) | 517 (let ((inhibit-read-only t) |
| 518 (no-default (eobp)) | 518 (no-default (eobp)) |
| 519 (find-tag-default-function 'ignore)) | 519 (find-tag-default-function 'ignore)) |
| 520 (setq tagname (car (find-tag-interactive "Find tag: "))) | 520 (with-no-warnings |
| 521 (setq tagname (car (find-tag-interactive "Find tag: ")))) | |
| 521 (find-tag tagname next-p regexp-p))) | 522 (find-tag tagname next-p regexp-p))) |
| 522 | 523 |
| 523 (defun eshell-move-argument (limit func property arg) | 524 (defun eshell-move-argument (limit func property arg) |
| 524 "Move forward ARG arguments." | 525 "Move forward ARG arguments." |
| 525 (catch 'eshell-incomplete | 526 (catch 'eshell-incomplete |