[nongnu] elpa/haskell-tng-mode 907255e 026/385: some namespacing

[ELPA Syncer]

branch: elpa/haskell-tng-mode
commit 907255eae9e34b08db79ee80f54228d699b73ea4
Author: Tseen She <ts33n.sh3@gmail.com>
Commit: Tseen She <ts33n.sh3@gmail.com>

    some namespacing
---
 haskell-tng-syntax.el | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/haskell-tng-syntax.el b/haskell-tng-syntax.el
index 5f7a564..48b073f 100644
--- a/haskell-tng-syntax.el
+++ b/haskell-tng-syntax.el
@@ -15,7 +15,7 @@
 
 (require 'dash)
 
-(defvar haskell-tng:syntax-table
+(defconst haskell-tng:syntax-table
   (let ((table (make-syntax-table)))
     (map-char-table
      #'(lambda (k v)
@@ -70,10 +70,10 @@
 
 (defun haskell-tng:syntax-propertize (start end)
   "For some context-sensitive syntax entries."
-  (haskell-tng:propertize-char-delims start end)
-  (haskell-tng:propertize-escapes start end))
+  (haskell-tng:syntax:char-delims start end)
+  (haskell-tng:syntax:escapes start end))
 
-(defun haskell-tng:propertize-char-delims (start end)
+(defun haskell-tng:syntax:char-delims (start end)
   "Matching apostrophes are string delimiters (literal chars)."
   (goto-char start)
   (while (re-search-forward "'\\\\?.'" end t)
@@ -82,7 +82,7 @@
       (put-text-property open (1+ open) 'syntax-table '(7 . ?\'))
       (put-text-property close (1+ close) 'syntax-table '(7 . ?\')))))
 
-(defun haskell-tng:propertize-escapes (start end)
+(defun haskell-tng:syntax:escapes (start end)
   "Backslash inside String is an escape character."
   (goto-char start)
   (while (re-search-forward "\\\\" end t)