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

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

[nongnu] elpa/jade-mode 109b9850d2 041/128: Created a syntax table for S


From: ELPA Syncer
Subject: [nongnu] elpa/jade-mode 109b9850d2 041/128: Created a syntax table for Stylus mode.
Date: Sat, 29 Jan 2022 08:24:45 -0500 (EST)

branch: elpa/jade-mode
commit 109b9850d2d0ea9f3065b7cf1ad8e962d8542f12
Author: Jaakko Pallari <jkpl@lepovirta.org>
Commit: Jaakko Pallari <jkpl@lepovirta.org>

    Created a syntax table for Stylus mode.
    
    Also, threw away kill-all-local-variables. I don't see any point in
    having it.
---
 stylus-mode.el | 15 +++++++++++----
 1 file changed, 11 insertions(+), 4 deletions(-)

diff --git a/stylus-mode.el b/stylus-mode.el
index 87ae474003..63eef0b6d0 100644
--- a/stylus-mode.el
+++ b/stylus-mode.el
@@ -52,6 +52,14 @@
     (,"$\\w+" 0 font-lock-variable-name-face)
     ))
 
+(defvar stylus-syntax-table
+  (let ((syntable (make-syntax-table)))
+    (modify-syntax-entry ?\/ ". 124b" syntable)
+    (modify-syntax-entry ?* ". 23" syntable)
+    (modify-syntax-entry ?\n "> b" syntable)
+    syntable)
+  "Syntax table for `stylus-mode'.")
+
 (defun stylus-region-for-sexp ()
   "Selects the current sexp as the region"
   (interactive)
@@ -71,19 +79,18 @@
 (define-derived-mode stylus-mode sws-mode
   "Stylus"
   "Major mode for editing stylus node.js templates"
-  (kill-all-local-variables)
   (setq tab-width 2)
 
   (setq mode-name "Stylus")
   (setq major-mode 'stylus-mode)
 
+  ;; syntax table
+  (set-syntax-table stylus-syntax-table)
+
   ;; highlight syntax
   (setq font-lock-defaults '(stylus-font-lock-keywords))
 
   ;; comments
-  (modify-syntax-entry ?\/ ". 124b")
-  (modify-syntax-entry ?* ". 23")
-  (modify-syntax-entry ?\n "> b")
   (set (make-local-variable 'comment-start) "//")
   (set (make-local-variable 'comment-end) "")
 



reply via email to

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