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

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

[nongnu] elpa/j-mode 7e7a01e 33/56: Add `inferior-j-mode'


From: ELPA Syncer
Subject: [nongnu] elpa/j-mode 7e7a01e 33/56: Add `inferior-j-mode'
Date: Sun, 29 Aug 2021 11:20:49 -0400 (EDT)

branch: elpa/j-mode
commit 7e7a01eb2436f91ba280a5b250ebdc0df28cae93
Author: Oleh Krehel <ohwoeowho@gmail.com>
Commit: Oleh Krehel <ohwoeowho@gmail.com>

    Add `inferior-j-mode'
---
 j-console.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/j-console.el b/j-console.el
index 0ebd63d..bd7d9f7 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"



reply via email to

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