cython mode, smerge mode, updates

[emacs-init.git] / setup / textile-mode.el

diff --git a/setup/textile-mode.el b/setup/textile-mode.el
index 9799c50..309b470 100644 (file)
--- a/setup/textile-mode.el
+++ b/setup/textile-mode.el
@@ -1,15 +1,20 @@
 (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 '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))