X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=sugar.git;a=blobdiff_plain;f=dot-files%2F_emacs_el;h=167d44372d746e952412defc0aa12343ed0c970b;hp=c3474307bf4f8fe4d4473ab1f96d82c2763fad4b;hb=a807b4609220d6a60673008b962d2456d4ccebb7;hpb=61befc31a165034bb00a66f817318bbceca2bacb

diff --git a/dot-files/_emacs_el b/dot-files/_emacs_el
index c347430..167d443 100644
--- a/dot-files/_emacs_el
+++ b/dot-files/_emacs_el
@@ -173,8 +173,14 @@ Will prompt you shell name when you type `C-u' before this command." t)
     (paren-activate))
 
 ;; elscreen
-(load "elscreen" "ElScreen" t)
-(elscreen-start)
+(condition-case e
+    (load "elscreen" "ElScreen" t)
+  (file-error
+   (if (equal (cadr e) "Cannot open load file")
+       (message "Warning: feature %s is absent" feature) ; warn and ignore
+     (apply 'signal (car e) (cdr e))))) ; rethrow
+(if (featurep 'elscreen)
+    (elscreen-start))
 (require-if-present 'elscreen-w3m)
 
 ;; undo-tree