bug#1074: marked as done (antlr-mode has undefined variable keyword-face )

[Emacs bug Tracking System]

Your message dated Sat, 04 Oct 2008 14:35:55 -0400
with message-id <e5fxncmcms.fsf@fencepost.gnu.org>
and subject line Re: bug#1074: antlr-mode has undefined variable keyword-face
has caused the Emacs bug report #1074,
regarding antlr-mode has undefined variable keyword-face 
to be marked as done.

This means that you claim that the problem has been dealt with.
If this is not the case it is now your responsibility to reopen the
bug report if necessary, and/or fix the problem forthwith.

(NB: If you are a system administrator and have no idea what this
message is talking about, this may indicate a serious mail system
misconfiguration somewhere. Please contact don@donarmstrong.com
immediately.)


-- 
1074: http://emacsbugs.donarmstrong.com/cgi-bin/bugreport.cgi?bug=1074
Emacs Bug Tracking System
Contact don@donarmstrong.com with problems
> --- Begin Message ---
>
>
>
> Subject: 
>
> antlr-mode has undefined variable keyword-face 
>
>
>
>
> Date: 
>
> Fri, 03 Oct 2008 10:05:39 -0400
>
>
>
>
> Open a .g file in Emacs, where auto-mode-alist configures
> .g files to use antlr-mode. You get an error in font-lock
> code because of an undefined variable, 'keyword-face'
>
> This patch appears to resolve the problem:
>
> diff -cws antlr-mode.el.orig antlr-mode.el
> *** antlr-mode.el.orig  Fri Oct  3 09:58:33 2008
> --- antlr-mode.el       Sun Jan 14 03:46:56 2007
> ***************
> *** 922,928 ****
>      `((antlr-invalidate-context-cache)
>        ("\\$setType[ \t]*(\\([A-Za-z\300-\326\330-\337]\\sw*\\))"
>         (1 antlr-tokendef-face))
> !      ("\\$\\sw+" (0 antlr-keyword-face))
>        ;; the tokens are already fontified as string/docstrings:
>        (,(lambda (limit)
>          (if antlr-font-lock-literal-regexp
> --- 922,928 ----
>      `((antlr-invalidate-context-cache)
>        ("\\$setType[ \t]*(\\([A-Za-z\300-\326\330-\337]\\sw*\\))"
>         (1 antlr-tokendef-face))
> !      ("\\$\\sw+" (0 keyword-face))
>        ;; the tokens are already fontified as string/docstrings:
>        (,(lambda (limit)
>          (if antlr-font-lock-literal-regexp
>
> Debugger entered--Lisp error: (void-variable keyword-face)
>   eval(keyword-face)
>   font-lock-fontify-keywords-region(1 1979 t)
>   font-lock-default-fontify-region(1 1979 t)
>   font-lock-fontify-region(1 1979 t)
>   byte-code("ŠÃ ĎÅed      #ˆÆ ˆÇ‰+‡" [save-match-data-internal verbose 
> font-lock-fontified match-data ((byte-code "ÁÂ\"‡" [save-match-data-internal 
> set-match-data evaporate] 3)) font-lock-fontify-region 
> font-lock-after-fontify-buffer t] 4)
>   font-lock-default-fontify-buffer()
>   font-lock-fontify-buffer()
>   font-lock-mode-internal(t)
>   font-lock-default-function(t)
>   font-lock-mode()
>   turn-on-font-lock()
>   turn-on-font-lock-if-enabled()
>   global-font-lock-mode-enable-in-buffers()
>   run-hooks(after-change-major-mode-hook)
>   run-mode-hooks(antlr-mode-hook)
>   antlr-mode()
>   set-auto-mode-0(antlr-mode nil)
>   set-auto-mode()
>   normal-mode(t)
>   after-find-file(nil t)
>   find-file-noselect-1(#<buffer Greet.g> 
> "~/eclipse-workspaces/acl/antlr_test/source/java/Greet.g" nil nil 
> "~/eclipse-workspaces/acl/ANTLR_test/Source/Java/Greet.g" (26662 (36053 . 
> 4313)))
>   
> ad-Orig-find-file-noselect("~/eclipse-workspaces/acl/antlr_test/source/java/Greet.g"
>  nil nil nil)
>   byte-code("ÆÇ       !‰ƒ
> $‰)‡" [ad-return-value filename dir nowarn rawfile wildcards nil 
> file-name-directory downcase file-name-nondirectory ad-Orig-find-file-noselect] 
> 6)
>   find-file-noselect("~/eclipse-workspaces/acl/ANTLR_test/Source/Java/Greet.g" 
> nil nil nil)
>   find-file("~/eclipse-workspaces/acl/ANTLR_test/Source/Java/Greet.g")
>   byte-code(" ƒ
>   
> new-find-alternate-file("~/eclipse-workspaces/acl/ANTLR_test/Source/Java/Greet.g")
>   call-interactively(new-find-alternate-file)
>   recursive-edit()
>   byte-code("Æ        @Ç=ƒ!
> VƒW
> ¥yˆ`dbˆÒ
> ¥
> Zyˆ`|ˆ)ÓcˆebˆÔÕÖ \"ˆ× ˆÔØ!ˆÙÊÔØ!ˆŠÚ ˆ+ه" [unread-command-char 
> debugger-args x debugger-buffer noninteractive debugger-batch-max-lines -1 
> debug backtrace-debug 4 t backtrace-frame lambda 5 pop-to-buffer debugger-mode 
> debugger-setup-buffer count-lines 2 "...\n" message "%s" buffer-string 
> kill-emacs "" nil recursive-edit middlestart buffer-read-only standard-output] 
> 4)
>   debug(error (void-variable keyword-face))
>   apply(debug error (void-variable keyword-face))
>   edebug(error (void-variable keyword-face))
>   eval(keyword-face)
>   font-lock-fontify-keywords-region(1 1979 t)
>   font-lock-default-fontify-region(1 1979 t)
>   font-lock-fontify-region(1 1979 t)
>   byte-code("ŠÃ ĎÅed      #ˆÆ ˆÇ‰+‡" [save-match-data-internal verbose 
> font-lock-fontified match-data ((byte-code "ÁÂ\"‡" [save-match-data-internal 
> set-match-data evaporate] 3)) font-lock-fontify-region 
> font-lock-after-fontify-buffer t] 4)
>   font-lock-default-fontify-buffer()
>   font-lock-fontify-buffer()
>   font-lock-mode-internal(t)
>   font-lock-default-function(t)
>   font-lock-mode()
>   turn-on-font-lock()
>   turn-on-font-lock-if-enabled()
>   global-font-lock-mode-enable-in-buffers()
>   run-hooks(after-change-major-mode-hook)
>   run-mode-hooks(antlr-mode-hook)
>   antlr-mode()
>   set-auto-mode-0(antlr-mode nil)
>   set-auto-mode()
>   normal-mode(t)
>   after-find-file(nil t)
>   find-file-noselect-1(#<killed buffer> 
> "~/eclipse-workspaces/acl/antlr_test/source/java/Greet.g" nil nil 
> "~/eclipse-workspaces/acl/ANTLR_test/Source/Java/Greet.g" (26662 (36053 . 
> 4313)))
>   
> ad-Orig-find-file-noselect("~/eclipse-workspaces/acl/antlr_test/source/java/Greet.g"
>  nil nil nil)
>   byte-code("ÆÇ       !‰ƒ
> $‰)‡" [ad-return-value filename dir nowarn rawfile wildcards nil 
> file-name-directory downcase file-name-nondirectory ad-Orig-find-file-noselect] 
> 6)
>   find-file-noselect("~/eclipse-workspaces/acl/ANTLR_test/Source/Java/Greet.g" 
> nil nil nil)
>   find-file("~/eclipse-workspaces/acl/ANTLR_test/Source/Java/Greet.g")
>   byte-code(" ƒ
>   
> new-find-alternate-file("~/eclipse-workspaces/acl/ANTLR_test/Source/Java/Greet.g")
>   call-interactively(new-find-alternate-file)
>
> In GNU Emacs 22.1.1 (i386-mingw-nt5.1.2600)
>  of 2007-06-02 on RELEASE
> Windowing system distributor `Microsoft Corp.', version 5.1.2600
> configured using `configure --with-gcc (3.4) --cflags -Ic:/gnuwin32/include'
>
> Important settings:
>   value of $LC_ALL: nil
>   value of $LC_COLLATE: nil
>   value of $LC_CTYPE: nil
>   value of $LC_MESSAGES: nil
>   value of $LC_MONETARY: nil
>   value of $LC_NUMERIC: nil
>   value of $LC_TIME: nil
>   value of $LANG: ENU
>   locale-coding-system: cp1252
>   default-enable-multibyte-characters: t
>
> Major mode: Antlr.Java/l
>
> Minor modes in effect:
>   display-time-mode: t
>   shell-dirtrack-mode: t
>   delete-selection-mode: t
>   pc-selection-mode: t
>   show-paren-mode: t
>   iswitchb-mode: t
>   encoded-kbd-mode: t
>   tooltip-mode: t
>   mouse-wheel-mode: t
>   file-name-shadow-mode: t
>   global-font-lock-mode: t
>   font-lock-mode: t
>   blink-cursor-mode: t
>   unify-8859-on-encoding-mode: t
>   utf-translate-cjk-mode: t
>   auto-compression-mode: t
>   line-number-mode: t
>   transient-mark-mode: t
>   abbrev-mode: t
>
> Recent input:
> <escape> X M-b M-b M-b M-b C-b C-b C-b C-d C-e <return>
> M-< C-x * c d SPC ~ / e m a c s <return> C-x o <escape>
> X M-b C-M-f C-SPC M-b M-b M-b M-b M-b M-b M-w C-g C-x
> o C-y <return> C-x o <escape> <escape> ( g e t e n
> v SPC " T E R M " ) <return> C-x C-o C-x o e c h o
> SPC $ T E R M <return> e x p o r t SPC T E R M = c
> m d <return> M-p M-p M-p <return> C-x o C-v C-x k SPC
> C-x B C-x B C-x o C-x j E M-< C-x C-f <backspace> M-b
> . C-e <return> C-s k e y w o r d - C-w C-s C-s C-s
> C-s C-a C-x o C-n C-n C-n C-x o C-x b a n t <return>
> C-s C-s C-s C-s C-s C-s C-s C-s C-s C-s C-a M-< M-x
> p w d <return> <help-echo> <down-mouse-1> <mouse-1>
> C-s a n t l r - <backspace> <backspace> <backspace>
> <backspace> <backspace> <backspace> SPC k e y w o r
> d - C-SPC M-b C-SPC a n t l r - C-s C-w C-w C-s C-a
> C-SPC C-o C-o C-o C-o C-o M-x e a l <backspace> <backspace>
> v a l - d e f SPC <return> M-x C-g C-/ C-x C-w a n
> l SPC <backspace> t SPC . r <backspace> o r i g <return>
> a n t l r - C-a C-x C-s C-x c M-x e v a l - d e SPC
> <return> C-x o C-x b G r e e <return> C-/ C-SPC C-x
> k SPC C-z 0 C-n C-n C-n <down-mouse-1> <mouse-1> M-x
> r e p o r t - SPC <return>
>
> Recent messages:
> undo-start: No undo information in this buffer
> Mark set
> Kill buffer Greet.g? (y or n)
> Invalid face reference: font-lock-keyword-face [43 times]
> Invalid face reference: highlight
> Invalid face reference: font-lock-keyword-face
> Invalid face reference: highlight [2 times]
> Fontifying Greet.g... (regexps......................)
> Fontifying Greet.g... (regexps......................)
> Loading emacsbug...done
>
>
> --
> David J. Biesack     SAS Institute Inc.
> (919) 531-7771       SAS Campus Drive
> http://www.sas.com   Cary, NC 27513
>
>
>
>
> --- End Message ---
> --- Begin Message ---
>
>
>
> Subject: 
>
> Re: bug#1074: antlr-mode has undefined variable keyword-face
>
>
>
>
> Date: 
>
> Sat, 04 Oct 2008 14:35:55 -0400
>
>
>
>
> User-agent: 
>
> Gnus (www.gnus.org), GNU Emacs (www.gnu.org/software/emacs/)
>
>
>
>
> "David J. Biesack" wrote:
>
> > Open a .g file in Emacs, where auto-mode-alist configures
> > .g files to use antlr-mode. You get an error in font-lock
> > code because of an undefined variable, 'keyword-face'
> >
> > This patch appears to resolve the problem:
>
> Thanks; applied. (Your patch was backwards somehow.)
>
>
> --- End Message ---