CVS update by michaels xemacs/lisp ...

[xemacs-cvs at xemacs.org]

  User: michaels
  Date: 07/08/02 08:37:57

  Modified:    xemacs/lisp ChangeLog startup.el
Log:
2007-08-02  Mike Sperber  <mike at xemacs.org>

	* startup.el (startup-setup-paths): Fix typo in init expression
	for `emacs-roots'.

Revision  Changes    Path
1.821     +5 -0      XEmacs/xemacs/lisp/ChangeLog

Index: ChangeLog
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/ChangeLog,v
retrieving revision 1.820
retrieving revision 1.821
diff -u -p -r1.820 -r1.821
--- ChangeLog	2007/08/02 06:33:55	1.820
+++ ChangeLog	2007/08/02 06:37:48	1.821
@@ -1,3 +1,8 @@
+2007-08-02  Mike Sperber  <mike at xemacs.org>
+
+	* startup.el (startup-setup-paths): Fix typo in init expression
+	for `emacs-roots'.
+
 2007-07-31  Mike Sperber  <mike at xemacs.org>
 
 	* find-paths.el (paths-for-each-site-directory): 



1.59      +1 -1      XEmacs/xemacs/lisp/startup.el

Index: startup.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/xemacs/lisp/startup.el,v
retrieving revision 1.58
retrieving revision 1.59
diff -u -p -r1.58 -r1.59
--- startup.el	2007/05/25 15:47:56	1.58
+++ startup.el	2007/08/02 06:37:53	1.59
@@ -1452,7 +1452,7 @@ This function is idempotent, so call thi
 			     t)))
 
   (setq emacs-roots (paths-find-emacs-roots invocation-directory invocation-name
-					    #'paths-emacs-data-root-p))
+					    #'paths-emacs-root-p))
 
   (setq emacs-data-roots (paths-find-emacs-roots invocation-directory invocation-name
 						 #'paths-emacs-data-root-p))