From c5cde04220c3961df41d290dfe3ddbcba821fa26 Mon Sep 17 00:00:00 2001 From: Dan Nicolaescu Date: Wed, 15 Jun 2011 07:07:48 -0700 Subject: [PATCH] Derive some programming modes from prog-mode. * lisp/progmodes/python.el (python-mode): Derive from prog-mode. * lisp/progmodes/ps-mode.el (ps-mode): * lisp/progmodes/mixal-mode.el (mixal-mode): * lisp/progmodes/ld-script.el (ld-script-mode): Likewise. --- lisp/ChangeLog | 7 +++++++ lisp/progmodes/ld-script.el | 2 +- lisp/progmodes/mixal-mode.el | 2 +- lisp/progmodes/ps-mode.el | 2 +- lisp/progmodes/python.el | 2 +- 5 files changed, 11 insertions(+), 4 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d4b554464a7..b868daaf907 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,10 @@ +2011-06-15 Dan Nicolaescu + + * progmodes/python.el (python-mode): Derive from prog-mode. + * progmodes/ps-mode.el (ps-mode): + * progmodes/mixal-mode.el (mixal-mode): + * progmodes/ld-script.el (ld-script-mode): Likewise. + 2011-06-15 Martin Rudalics * window.el (display-buffer-alist): Trim default value to avoid diff --git a/lisp/progmodes/ld-script.el b/lisp/progmodes/ld-script.el index 8bdac61d4ab..c682bfa0280 100644 --- a/lisp/progmodes/ld-script.el +++ b/lisp/progmodes/ld-script.el @@ -168,7 +168,7 @@ "Default font-lock-keywords for `ld-script-mode'.") ;;;###autoload -(define-derived-mode ld-script-mode nil "LD-Script" +(define-derived-mode ld-script-mode prog-mode "LD-Script" "A major mode to edit GNU ld script files" (set (make-local-variable 'comment-start) "/* ") (set (make-local-variable 'comment-end) " */") diff --git a/lisp/progmodes/mixal-mode.el b/lisp/progmodes/mixal-mode.el index 0d8cdd9f9b1..103c7be7d3c 100644 --- a/lisp/progmodes/mixal-mode.el +++ b/lisp/progmodes/mixal-mode.el @@ -1103,7 +1103,7 @@ Assumes that file has been compiled with debugging support." (error "mixvm.el needs to be loaded to run `mixvm'"))) ;;;###autoload -(define-derived-mode mixal-mode fundamental-mode "mixal" +(define-derived-mode mixal-mode prog-mode "mixal" "Major mode for the mixal asm language." (set (make-local-variable 'comment-start) "*") (set (make-local-variable 'comment-start-skip) "^\\*[ \t]*") diff --git a/lisp/progmodes/ps-mode.el b/lisp/progmodes/ps-mode.el index cade56a194c..d60e7513651 100644 --- a/lisp/progmodes/ps-mode.el +++ b/lisp/progmodes/ps-mode.el @@ -485,7 +485,7 @@ If nil, use `temporary-file-directory'." ;; PostScript mode. ;;;###autoload -(define-derived-mode ps-mode fundamental-mode "PostScript" +(define-derived-mode ps-mode prog-mode "PostScript" "Major mode for editing PostScript with GNU Emacs. Entry to this mode calls `ps-mode-hook'. diff --git a/lisp/progmodes/python.el b/lisp/progmodes/python.el index b99cad1d081..3d243f14f07 100644 --- a/lisp/progmodes/python.el +++ b/lisp/progmodes/python.el @@ -2420,7 +2420,7 @@ without confirmation." (defvar python-mode-running) ;Dynamically scoped var. ;;;###autoload -(define-derived-mode python-mode fundamental-mode "Python" +(define-derived-mode python-mode prog-mode "Python" "Major mode for editing Python files. Turns on Font Lock mode unconditionally since it is currently required for correct parsing of the source. -- 2.11.4.GIT