X-Git-Url: http://g0dil.de/git?a=blobdiff_plain;f=setup%2Ftextile-mode.el;h=606ef1cb550beac55062576206fd20468165603f;hb=30a865756f676c2eb476e249d163054152a45e81;hp=9799c503cbb06ca98162d6108d7189c721b7104a;hpb=c79022f0450cd093c456a42b8473686e3b523db7;p=emacs-init.git diff --git a/setup/textile-mode.el b/setup/textile-mode.el index 9799c50..606ef1c 100644 --- a/setup/textile-mode.el +++ b/setup/textile-mode.el @@ -1,15 +1,23 @@ (add-to-list 'load-path (concat (file-name-directory - (directory-file-name - (file-name-directory (or load-file-name - (when (boundp 'bytecomp-filename) bytecomp-filename) - buffer-file-name)))) - "textile-mode")) + (directory-file-name + (file-name-directory + (or load-file-name + (when (boundp 'bytecomp-filename) bytecomp-filename) + buffer-file-name)))) + "textile-mode")) (require 'textile-mode) -(add-to-list 'auto-mode-alist '("/itsalltext/otds.traveltainment.de" . textile-mode)) +(add-to-list 'auto-mode-alist '("/itsalltext/tpm.traveltainment.int" . textile-mode)) +(add-to-list 'edit-server-url-major-mode-alist '("tpm.traveltainment.int" . textile-mode)) -(setq textile-font-lock-keywords (delq (loop for elt in textile-font-lock-keywords - for face = (nth 2 elt) - if (and (consp face) (eq (car face) 'quote) (eq (cadr face) 'textile-acronym-face)) return elt) - textile-font-lock-keywords)) +(setq textile-font-lock-keywords + (delq (loop for elt in textile-font-lock-keywords + for face = (nth 2 elt) + if (and (consp face) + (eq (car face) 'quote) + (eq (cadr face) 'textile-acronym-face)) return elt) + textile-font-lock-keywords)) + +(require 'longlines) +(add-hook 'textile-mode-hook 'longlines-mode)