emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/wisitoken-grammar-mode 39f8d03 3/3: * wisitoken-grammar


From: Stephen Leake
Subject: [elpa] externals/wisitoken-grammar-mode 39f8d03 3/3: * wisitoken-grammar-mmm.el: Delete; merged with wisitoken-grammar-mode.el
Date: Sat, 17 Aug 2019 19:15:11 -0400 (EDT)

branch: externals/wisitoken-grammar-mode
commit 39f8d03a989e76a37c44af683647fc02cca7d79c
Merge: 5322510 fae4953
Author: Stephen Leake <address@hidden>
Commit: Stephen Leake <address@hidden>

    * wisitoken-grammar-mmm.el: Delete; merged with wisitoken-grammar-mode.el
    
    * wisitoken-grammar-mode.el: Resolve FIXME.
---
 wisitoken-grammar-mmm.el  | 44 ++++++++++++++++++++++++++++++++++++++++++++
 wisitoken-grammar-mode.el |  2 --
 2 files changed, 44 insertions(+), 2 deletions(-)

diff --git a/wisitoken-grammar-mmm.el b/wisitoken-grammar-mmm.el
new file mode 100644
index 0000000..cc19a7c
--- /dev/null
+++ b/wisitoken-grammar-mmm.el
@@ -0,0 +1,44 @@
+;;; Define multi-major-mode stuff for wisitoken-grammar mode.  -*- 
lexical-binding:t -*-
+
+;; Copyright (C) 2019  Free Software Foundation, Inc.
+
+;; This file is free software; you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation; either version 3, or (at your option)
+;; any later version.
+
+;; This file is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with GNU Emacs.  If not, see <https://www.gnu.org/licenses/>.
+
+(require 'mmm-mode)
+
+(mmm-add-classes
+ '((wisi-action
+    :match-submode wisitoken-grammar-mmm-submode
+    :face mmm-code-submode-face
+    :front "%("
+    :back ")%"
+    :insert ((?a wisi-action nil @ "%(" @ "" _ "" @ ")%")))
+   (wisi-code
+    :match-submode wisi-mmm-submode
+    :face mmm-code-submode-face
+    :front "%{"
+    :back "}%"
+    :insert ((?a wisi-code nil @ "%{" @ "" _ "" @ "}%")))
+   ))
+
+(defvar wisitoken-grammar-action-mode) ;; in wisitoken-grammar-mode.el
+(defun wisitoken-grammar-mmm-submode (_delim)
+  "for :match-submode"
+  wisitoken-grammar-action-mode)
+
+(add-to-list 'mmm-mode-ext-classes-alist '(wisitoken-grammar-mode nil 
wisi-action))
+(add-to-list 'mmm-mode-ext-classes-alist '(wisitoken-grammar-mode nil 
wisi-code))
+
+(provide 'wisitoken-grammar-mmm)
+;;; end of file
diff --git a/wisitoken-grammar-mode.el b/wisitoken-grammar-mode.el
index 1f6e53a..42bfe65 100644
--- a/wisitoken-grammar-mode.el
+++ b/wisitoken-grammar-mode.el
@@ -362,8 +362,6 @@ Otherwise insert a plain new line."
   (add-hook 'xref-backend-functions #'wisitoken-grammar--xref-backend
            nil ;; append
            t)
-  (add-hook 'before-save-hook 'delete-trailing-whitespace nil t)
-  (add-hook 'before-save-hook 'copyright-update nil t)
 
   (wisi-setup
    :indent-calculate nil



reply via email to

[Prev in Thread] Current Thread [Next in Thread]