Skip to content

Commit 4eacd79

Browse files
committed
- [X] Use compatible with old emacs version api (replace (setq-local var val) with (set (make-local-variable 'var) val))
1 parent ccbdebb commit 4eacd79

File tree

2 files changed

+20
-13
lines changed

2 files changed

+20
-13
lines changed

psci.el

Lines changed: 13 additions & 13 deletions
Original file line numberDiff line numberDiff line change
@@ -102,19 +102,19 @@
102102
"Major mode for `run-psci'.
103103
104104
\\<psci-mode-map>"
105-
(setq-local comint-prompt-regexp (concat "^" (regexp-quote psci/prompt)))
106-
(setq-local paragraph-separate "\\'") ;; so commands like M-{ and M-} work.
107-
(setq-local paragraph-start comint-prompt-regexp)
108-
(setq-local comint-input-sender-no-newline nil)
109-
;; (setq-local comint-input-sender 'comint-simple-send)
110-
;; (setq-local comint-get-old-input 'comint-get-old-input-default)
111-
(setq-local comint-process-echoes nil)
112-
(setq-local comint-prompt-read-only t) ;; read-only prompt
113-
(setq-local comint-eol-on-send t)
114-
(setq-local comint-input-filter-functions nil)
115-
(setq-local font-lock-defaults '(purescript-font-lock-keywords t))
116-
(setq-local comment-start "-- ")
117-
(setq-local comment-use-syntax t))
105+
(set (make-local-variable 'comint-prompt-regexp) (concat "^" (regexp-quote psci/prompt)))
106+
(set (make-local-variable 'paragraph-separate) "\\'") ;; so commands like M-{ and M-} work.
107+
(set (make-local-variable 'paragraph-start) comint-prompt-regexp)
108+
(set (make-local-variable 'comint-input-sender-no-newline) nil)
109+
(set (make-local-variable 'comint-input-sender) 'comint-simple-send)
110+
(set (make-local-variable 'comint-get-old-input) 'comint-get-old-input-default)
111+
(set (make-local-variable 'comint-process-echoes) nil)
112+
(set (make-local-variable 'comint-prompt-read-only) t) ;; read-only prompt
113+
(set (make-local-variable 'comint-eol-on-send) t)
114+
(set (make-local-variable 'comint-input-filter-functions) nil)
115+
(set (make-local-variable 'font-lock-defaults) '(purescript-font-lock-keywords t))
116+
(set (make-local-variable 'comment-start) "-- ")
117+
(set (make-local-variable 'comment-use-syntax) t))
118118

119119
(defun psci/--run-psci-command! (command)
120120
"Run psci COMMAND as string."

todo.org

Lines changed: 7 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -27,3 +27,10 @@ CLOSED: [2014-10-29 Wed 18:54]
2727
- [X] Add to el-get - https://github.com/ardumont/el-get/blob/add-psci-recipe/recipes/psci.rcp
2828
- [X] Update documentation regarding installation steps
2929
- [X] Update documentation regarding usage
30+
* IN-PROGRESS 0.0.4 [50%]
31+
- [X] Update version
32+
- [X] Add an interactive command for displaying the current version
33+
- [X] Use compatible with old emacs version api (replace `(setq-local var val)` with `(set (make-local-variable 'var) val)`)
34+
- [ ] shell-quote-argument
35+
- [ ] Add a minor mode instead of modifying purescript-mode-map
36+
- [ ] Update documentation about the minor-mode activation

0 commit comments

Comments
 (0)