--- a/lisp/prim/startup.el	Mon Aug 13 09:18:41 2007 +0200
+++ b/lisp/prim/startup.el	Mon Aug 13 09:19:45 2007 +0200
@@ -883,7 +883,7 @@
     "To get out of XEmacs, type " (key save-buffers-kill-emacs) ".\n"
     "Type " (key help-with-tutorial) " for a tutorial on using XEmacs.\n"
     "Type " (key info) " to enter Info, "
-    "which you can use to read online documentation.\n\n"
+    "which you can use to read online documentation.\n"
     (face (bold red) ( "\
 For tips and answers to frequently asked questions, see the XEmacs FAQ.
 \(It's on the Help menu, or type " (key xemacs-local-faq) " [a capital F!].\)"))))
@@ -1208,6 +1208,12 @@
 		    )
 		  ))
     
+    ;; 1997/03/06 by Jeff Miller <jmiller@bayserve.net>
+    ;; initialize 'site-directory'.  This is the site-lisp dir used by 
+    ;; XEmacs
+    (if site-lisp
+	(setq site-directory (file-name-as-directory site-lisp))
+      )
     ;; If running from the build directory, always prefer the exec-directory
     ;; that is here over to the one that came from paths.h.
     (when (or (and (null exec-directory) lib-src)