User: youngs
Date: 05/10/10 04:45:34
Modified: xemacs/lisp ChangeLog help.el
Log:
2005-10-10 Steve Youngs <steve(a)sxemacs.org>
* help.el (view-emacs-news): Use `expand-file-name' instead of
`locate-data-file' as the latter will find any "NEWS" files that
might exist in packages _before_ the one in core.
Revision Changes Path
1.681 +6 -0 XEmacs/xemacs/lisp/ChangeLog
Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/ChangeLog,v
retrieving revision 1.680
retrieving revision 1.681
diff -u -p -r1.680 -r1.681
--- ChangeLog 2005/10/09 10:41:37 1.680
+++ ChangeLog 2005/10/10 02:45:31 1.681
@@ -1,3 +1,9 @@
+2005-10-10 Steve Youngs <steve(a)sxemacs.org>
+
+ * help.el (view-emacs-news): Use `expand-file-name' instead of
+ `locate-data-file' as the latter will find any "NEWS" files that
+ might exist in packages _before_ the one in core.
+
2005-10-09 Adrian Aichner <adrian(a)xemacs.org>
* finder.el (finder-find-library): Return filename actually
1.45 +1 -1 XEmacs/xemacs/lisp/help.el
Index: help.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/help.el,v
retrieving revision 1.44
retrieving revision 1.45
diff -u -p -r1.44 -r1.45
--- help.el 2005/01/31 20:08:45 1.44
+++ help.el 2005/10/10 02:45:32 1.45
@@ -838,7 +838,7 @@ of the key sequence that ran this comman
(defun view-emacs-news ()
"Display info on recent changes to XEmacs."
(interactive)
- (Help-find-file (locate-data-file "NEWS")))
+ (Help-find-file (expand-file-name "NEWS" data-directory)))
(defun xemacs-www-page ()
"Go to the XEmacs World Wide Web page."
Show replies by date