1 (add-to-list 'load-path (concat (file-name-directory
3 (file-name-directory (or load-file-name
4 (when (boundp 'bytecomp-filename) bytecomp-filename)
8 (require 'textile-mode)
10 (add-to-list 'auto-mode-alist '("/itsalltext/otds.traveltainment.de" . textile-mode))
12 (setq textile-font-lock-keywords (delq (loop for elt in textile-font-lock-keywords
13 for face = (nth 2 elt)
14 if (and (consp face) (eq (car face) 'quote) (eq (cadr face) 'textile-acronym-face)) return elt)
15 textile-font-lock-keywords))