mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-20 18:17:20 +00:00
Code Issues Releases Activity

Did away with the dependency on `c-emacs-features' when populating

Browse Source 
`rul-generic-mode-syntax-table'; we already know this isn't XEmacs.
This commit is contained in:
Martin Stjernholm 2003-07-04 10:47:06 +00:00
parent b5a670812e
commit 0dd3ea4da4
2 changed files with 9 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/ChangeLog
View File

@ -1,3 +1,9 @@
2003-07-04 Martin Stjernholm <mast@lysator.liu.se>
* generic-x.el: Did away with the dependency on `c-emacs-features'
when populating `rul-generic-mode-syntax-table'; we already know
this isn't XEmacs.
2003-07-03 Martin Stjernholm <bug-cc-mode@gnu.org>
* progmodes/cc-menus.el (cc-imenu-init): Do not set

18
lisp/generic-x.el
View File

@ -1,6 +1,6 @@
;;; generic-x.el --- Extra Modes for generic-mode -*- no-byte-compile: t -*-
;; Copyright (C) 1997, 1998 Free Software Foundation, Inc.
;; Copyright (C) 1997, 1998, 2003 Free Software Foundation, Inc.
;; Author: Peter Breton <pbreton@cs.umb.edu>
;; Created: Tue Oct 08 1996
@ -1411,20 +1411,8 @@ you must reload generic-x to enable the specified modes."
(modify-syntax-entry ?\r "> b" rul-generic-mode-syntax-table)
(modify-syntax-entry ?\n "> b" rul-generic-mode-syntax-table)
(cond
;; XEmacs 19 & 20 & 21
((memq '8-bit c-emacs-features)
(modify-syntax-entry ?/ ". 1456" rul-generic-mode-syntax-table)
(modify-syntax-entry ?* ". 23" rul-generic-mode-syntax-table)
)
;; Emacs 19 & 20
((memq '1-bit c-emacs-features)
(modify-syntax-entry ?/ ". 124b" rul-generic-mode-syntax-table)
(modify-syntax-entry ?* ". 23" rul-generic-mode-syntax-table)
)
;; incompatible
(t (error "Run Mode is incompatible with this version of Emacs"))
)
(modify-syntax-entry ?/ ". 124b" rul-generic-mode-syntax-table)
(modify-syntax-entry ?* ". 23" rul-generic-mode-syntax-table)
;; here manually instead
(defun generic-rul-mode-setup-function ()