Hi, Thomas!
I don't know much about the clearcase package, so I can't really make
suggestions to resolve the issues mentioned below. Especially the
first one make me reluctant to apply the patch myself. Sorry.
If you or someone else can come up with the appropriate way to
register these defaults, or explain why it needs to be done this way,
I'll be happy to apply.
Thomas Viehweger writes:
+ (set (make-local-variable 'font-lock-defaults)
+ '(clearcase-edcs-font-lock-keywords nil t nil))
At least in XEmacs, `font-lock-defaults' is automatically
buffer-local. You could just use setq here.
But this is clearly not the right thing to do. `font-lock-defaults'
documents that the keywords should be placed in a property on a major
mode symbol.
+(defvar clearcase-edcs-font-lock-keywords
+ (eval-when-compile
Why eval-when-compile? That just turns this into a literal list anyway.
+ (list
+ '( "#.*" . font-lock-comment-face)
+ '(
"\\<\\(e\\(lement\\|nd\\)\\|include\\|load\\|mkbranch\\|time\\)\\>" (1
font-lock-builtin-face))
+ '( "[ \t]+-[a-zA-Z0-9_]+" . font-lock-type-face)
+)))
+
;;{{{ Commands
(defun clearcase-edcs-edit (tag-name)
----------------------------------------------------------------------
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta
_______________________________________________
XEmacs-Beta mailing list
XEmacs-Beta(a)xemacs.org
http://lists.xemacs.org/mailman/listinfo/xemacs-beta