(cond ((equal host "seras")
(set-frame-font "Dejavu Sans Mono 11" t))
+ ((equal host "yukari.cielonegro.org")
+ (set-frame-font "Dejavu Sans Mono 11" t))
+
((equal host "aria.cielonegro.org")
(progn
(set-frame-font "Dejavu Sans Mono 13" 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