[nongnu] elpa/j-mode 0c58dec 34/56: Merge pull request #9 from abo-abo/master

[ELPA Syncer]

branch: elpa/j-mode
commit 0c58dec51683236556bcd87151851463ac53c056
Merge: 36cb97e 7e7a01e
Author: Zachary Elliott <zach@nyu.edu>
Commit: Zachary Elliott <zach@nyu.edu>

    Merge pull request #9 from abo-abo/master
    
    Add `inferior-j-mode'
---
 j-console.el | 6 +++++-
 j-mode.el    | 2 +-
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/j-console.el b/j-console.el
index a2d8378..fa4294d 100644
--- a/j-console.el
+++ b/j-console.el
@@ -109,12 +109,16 @@ Should be NIL if there is no file not the empty string"
         (j-console-create-session)
         (get-process j-console-cmd-buffer-name))))
 
+(define-derived-mode inferior-j-mode comint-mode "Inferior J"
+  "Major mode for J inferior process.")
+
 ;;;###autoload
 (defun j-console ()
   "Ensures a running j-console-cmd session and switches focus to
 the containing buffer"
   (interactive)
-  (switch-to-buffer-other-window (process-buffer (j-console-ensure-session))))
+  (switch-to-buffer-other-window (process-buffer (j-console-ensure-session)))
+  (inferior-j-mode))
 
 (defun j-console-execute-region ( start end )
   "Sends current region to the j-console-cmd session and exectues it"
diff --git a/j-mode.el b/j-mode.el
index f6de5c1..0911fe2 100644
--- a/j-mode.el
+++ b/j-mode.el
@@ -100,7 +100,7 @@
         major-mode 'j-mode)
   (set-syntax-table j-font-lock-syntax-table)
   (set (make-local-variable 'comment-start)
-       "NB.")
+       "NB. ")
   (set (make-local-variable 'comment-start-skip)
        "\\(\\(^\\|[^\\\\\n]\\)\\(\\\\\\\\\\)*\\)NB. *")
   (set (make-local-variable 'font-lock-comment-start-skip)