[Assorted-commits] SF.net SVN: assorted: [757] configs/trunk/src/default.emacs

[<yan...@us...>]

Revision: 757
          http://assorted.svn.sourceforge.net/assorted/?rev=757&view=rev
Author:   yangzhang
Date:     2008-05-08 13:20:00 -0700 (Thu, 08 May 2008)

Log Message:
-----------
added more robust initialization

Modified Paths:
--------------
    configs/trunk/src/default.emacs

Modified: configs/trunk/src/default.emacs
===================================================================
--- configs/trunk/src/default.emacs	2008-05-08 20:19:42 UTC (rev 756)
+++ configs/trunk/src/default.emacs	2008-05-08 20:20:00 UTC (rev 757)
@@ -1,6 +1,11 @@
 ;;; XEmacs backwards compatibility file
-(load-file "/opt/armed/share/configs/emacs/yang.el")
 
+(mapcar (lambda (basepath)
+          (let ((path (concat basepath "/armed/share/configs/emacs/yang.el")))
+               (when (file-exists-p path) (load-file path))))
+        (list "/opt" (concat (getenv "HOME") "/.local")))
+;;(load-file "/opt/armed/share/configs/emacs/yang.el")
+
 ;; ;;; XEmacs backwards compatibility file
 ;; (setq user-init-file
 ;;       (expand-file-name "init.el"


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.