(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)
- (set-fontset-font nil 'japanese-jisx0208 "さざなみゴシック")
- (set-fontset-font nil 'japanese-jisx0212 "さざなみゴシック")
- (set-fontset-font nil 'katakana-jisx0201 "さざなみゴシック"))))))
+ ;; Emacs 24.4.1 somehow gets very slow when the following
+ ;; lines are uncommented.
+ ;;(set-fontset-font nil 'japanese-jisx0208 "さざなみゴシック")
+ ;;(set-fontset-font nil 'japanese-jisx0212 "さざなみゴシック")
+ ;;(set-fontset-font nil 'katakana-jisx0201 "さざなみゴシック")
+ )))))
;; Hooks for newline-and-indent ------------------------------------------------
;(mapcar (lambda (hook)
(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
(setq tsv-separator-list '("\t"))
;(add-to-list 'auto-mode-alist '("\\.[Tt][Ss][Vv]\\'" . tsv-mode))
+;; markdown-mode
+;; http://jblevins.org/projects/markdown-mode/
+(autoload 'markdown-mode "markdown-mode.el" "Major mode for editing Markdown files" t)
+(add-to-list 'auto-mode-alist '("\\.md\\'" . markdown-mode))
+
;; yaml-mode
(autoload 'yaml-mode "yaml-mode"
"Major mode for editing YAML files." t)
(add-to-list 'auto-mode-alist '("\\.ya?ml$" . yaml-mode))
+;; less-css-mode
+(autoload 'less-css-mode "less-css-mode" "Major mode for editing LESS files" t)
+(add-to-list 'auto-mode-alist '("\\.less\\'" . less-css-mode))
+
;; Troublesome Tasks
(if (equal (system-name) "seras")
(progn