Mercurial > emacs
changeset 12977:046bc1e2acc9
(ange-ftp-vms-sans-version): Accept extra args.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 31 Aug 1995 15:05:39 +0000 |
| parents | 55e427250ad3 |
| children | 88a47d611c4a |
| files | lisp/ange-ftp.el |
| diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ange-ftp.el Thu Aug 31 02:37:12 1995 +0000 +++ b/lisp/ange-ftp.el Thu Aug 31 15:05:39 1995 +0000 @@ -4835,7 +4835,7 @@ ;; (cons '(vms . ange-ftp-dired-vms-ls-trim) ;; ange-ftp-dired-ls-trim-alist))) -(defun ange-ftp-vms-sans-version (name) +(defun ange-ftp-vms-sans-version (name &rest args) (save-match-data (if (string-match ";[0-9]+$" name) (substring name 0 (match-beginning 0))