(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))
(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)
"<xemacs-beta@xemacs.org>"))
topic)
(goto-char (point-max))