[Maxima-commits] CVS: maxima-pre59/emacs maxima-font-lock.el,1.1,1.2

[Jay B. <bel...@us...>]

Update of /cvsroot/maxima/maxima-pre59/emacs
In directory usw-pr-cvs1:/tmp/cvs-serv3187

Modified Files:
	maxima-font-lock.el 
Log Message:
Font-locking for XEmacs was merged.  The word boundaries for the
font-lock regexps were fixed.  The faces were made customizable.


Index: maxima-font-lock.el
===================================================================
RCS file: /cvsroot/maxima/maxima-pre59/emacs/maxima-font-lock.el,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** maxima-font-lock.el	2001/11/08 22:23:36	1.1
--- maxima-font-lock.el	2001/11/11 01:47:41	1.2
***************
*** 1,3 ****
! ;;; maxima-font-lock-maker.el --- create maxima-font-lock.el for maxima.el
  
  ;; Copyright: (C) 2001 Jay Belanger
--- 1,3 ----
! ;;; maxima-font-lock.el --- syntax highlighting for maxima.el
  
  ;; Copyright: (C) 2001 Jay Belanger
***************
*** 32,80 ****
  ;;; This file is used for font-lock for maxima.el
[...2489 lines suppressed...]
!           nil t nil maxima-beginning-of-form)))
! 
! (add-hook 'maxima-mode-hook 'maxima-font-setup)
! 
! (defvar inferior-maxima-keywords
!   (append maxima-keywords
!           `( 
!             (,inferior-maxima-match-prompts (0 inferior-maxima-prompt-face t))
!             (,inferior-maxima-match-warnings (0 inferior-maxima-warning-face t))))
!   "Keywords for Inferior Maxima font-locking.")
! 
! (defun inferior-maxima-font-setup ()
!   (make-local-variable 'font-lock-defaults)
!   (setq font-lock-defaults 
!         '(inferior-maxima-keywords 
!           nil t nil maxima-beginning-of-form)))
! 
! (add-hook 'inferior-maxima-mode-hook 'inferior-maxima-font-setup)
! 
! ;;; End of maxima-font-lock.el