X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Flisp-mnt.el;h=223f8e0af6dbeac201191b36dbd139261b8b2945;hb=bbeb2495812aebfcba6dbe12c26fbb14f5a702c6;hp=76feeb23f0fd754f8d63aa920dd43987998dc93f;hpb=a5f466de30a3e927ed1146b0c7e3870e71465c8f;p=chise%2Fxemacs-chise.git.1 diff --git a/lisp/lisp-mnt.el b/lisp/lisp-mnt.el index 76feeb2..223f8e0 100644 --- a/lisp/lisp-mnt.el +++ b/lisp/lisp-mnt.el @@ -6,7 +6,7 @@ ;; Maintainer: Eric S. Raymond ;; Created: 14 Jul 1992 ;; Keywords: docs, maint -;; X-Modified-by: Bob Weiner , 4/14/95, to support +;; X-Modified-by: Bob Weiner , 4/14/95, to support ;; InfoDock headers. ;; X-Bogus-Bureaucratic-Cruft: Gruad will get you if you don't watch out! @@ -343,7 +343,7 @@ The return value has the form (NAME . ADDRESS)." (defun lm-version (&optional file) "Return the version listed in file FILE, or current buffer if FILE is nil. -This can befound in an RCS or SCCS header to crack it out of." +This can be found in an RCS or SCCS header to crack it out of." (save-excursion (if file (find-file file)) @@ -560,8 +560,8 @@ Prompts for bug subject. Leaves you in a mail buffer." (mail nil (if addr (concat (car addr) " <" (cdr addr) ">") - (or (and (boundp 'report-emacs-bug-beta-address) - report-emacs-bug-beta-address) + (or (and (boundp 'report-xemacs-bug-beta-address) + report-xemacs-bug-beta-address) "")) topic) (goto-char (point-max))