X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=lisp%2Flisp-mnt.el;h=223f8e0af6dbeac201191b36dbd139261b8b2945;hp=76feeb23f0fd754f8d63aa920dd43987998dc93f;hb=d498337390c3a567aae4fa0e1c1f06064a808d21;hpb=77dcef404dc78635f6ffa8f71a803d2bc7cc8921 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))