On Fri, Jun 14, 2002 at 10:35:03AM +0200, Uwe Voelker ([EMAIL PROTECTED]) wrote:
> Hello,
>
> has anybody written a TT2 syntax highlighting file for Emacs?
My tt-mode.el file is attached. Currently, it simply highlights anything
that matches [% ... %] as a keyword, but it's a start. If anyone has any
other features that they use and would like incorporated into this file then
please let me know.
Dave...
--
.sig missing...
;; tt-mode.el --- Emacs major mode for editing Template Toolkit files
;;
;; Copyright (c) 2002 Dave Cross, all rights reserved.
;;
;; This file may be distributed under the same terms as GNU Emacs.
;;
;; $Id: tt-mode.el,v 1.1.1.1 2002/06/15 13:51:56 dave Exp $
;;
;; This file adds simple font highlighting of TT directives when you are
;; editing Template Toolkit files.
;;
;; I usually give these files an extension of .tt and in order to automatically
;; invoke this mode for these files, I have the following in my .emacs file.
;;
;; (setq load-path
;; (cons "/home/dave/xemacs" load-path))
;; (autoload 'tt-mode "tt-mode")
;;(setq auto-mode-alist
;; (append '(("\\.tt$" . tt-mode)) auto-mode-alist ))
;;
;; Something similar may well work for you.
;;
;; $Log: tt-mode.el,v $
;; Revision 1.1.1.1 2002/06/15 13:51:56 dave
;; Initial Version
;;
;;
(require 'font-lock)
(defvar tt-mode-hook nil
"List of functions to call when entering TT mode")
(defvar tt-font-lock-keywords
(list
;; Fontify [& ... &] expressions
'("\\(\\[%.*%\\]\\)" 1 font-lock-keyword-face t)
)
"Expressions to font-lock in tt-mode.")
(defun tt-mode ()
"Major mode for editing Template Toolkit files"
(interactive)
(kill-all-local-variables)
(setq major-mode 'tt-mode)
(setq mode-name "TT")
(if (string-match "Xemacs" emacs-version)
(progn
(make-local-variable 'font-lock-keywords)
(setq font-lock-keywords tt-font-lock-keywords))
;; Emacs
(make-local-variable 'font-lock-defaults)
(setq font-lock-defaults '(tt-font-lock-keywords nil t))
)
(font-lock-mode)
(run-hooks tt-mode-hook))
(provide 'tt-mode)
