[nongnu] elpa/inf-ruby 7c36372de4 1/2: Use setq-local more

[ELPA Syncer]

branch: elpa/inf-ruby
commit 7c36372de48f105423fb07e12c718d0220db5e0f
Author: Dmitry Gutov <dmitry@gutov.dev>
Commit: Dmitry Gutov <dmitry@gutov.dev>

    Use setq-local more
---
 inf-ruby.el | 20 ++++++++------------
 1 file changed, 8 insertions(+), 12 deletions(-)

diff --git a/inf-ruby.el b/inf-ruby.el
index 808eb6f846..a05e175aba 100755
--- a/inf-ruby.el
+++ b/inf-ruby.el
@@ -310,9 +310,8 @@ The following commands are available:
 
   (add-hook 'comint-output-filter-functions 'inf-ruby-output-filter nil t)
   (setq comint-get-old-input 'inf-ruby-get-old-input)
-  (set (make-local-variable 'compilation-error-regexp-alist)
-       inf-ruby-error-regexp-alist)
-  (set (make-local-variable 'comint-prompt-read-only) 
inf-ruby-prompt-read-only)
+  (setq-local compilation-error-regexp-alist inf-ruby-error-regexp-alist)
+  (setq-local comint-prompt-read-only inf-ruby-prompt-read-only)
   (when (eq system-type 'windows-nt)
     (setq comint-process-echoes t))
   (add-hook 'completion-at-point-functions 'inf-ruby-completion-at-point nil t)
@@ -995,17 +994,14 @@ interactive mode, i.e. hits a debugger breakpoint."
         (orig-mode-line-process mode-line-process)
         (orig-error-alist compilation-error-regexp-alist))
     (inf-ruby-mode)
-    (make-local-variable 'inf-ruby-orig-compilation-mode)
-    (setq inf-ruby-orig-compilation-mode mode)
-    (set (make-local-variable 'compilation-arguments) arguments)
-    (set (make-local-variable 'inf-ruby-orig-error-regexp-alist)
-         orig-error-alist)
+    (setq-local inf-ruby-orig-compilation-mode mode)
+    (setq-local compilation-arguments arguments)
+    (setq-local inf-ruby-orig-error-regexp-alist orig-error-alist)
     (when orig-mode-line-process
       (setq mode-line-process orig-mode-line-process)))
   (let ((proc (get-buffer-process (current-buffer))))
     (when proc
-      (make-local-variable 'inf-ruby-orig-process-filter)
-      (setq inf-ruby-orig-process-filter (process-filter proc))
+      (setq-local inf-ruby-orig-process-filter (process-filter proc))
       (set-process-filter proc 'comint-output-filter))
     (when (looking-back inf-ruby-prompt-pattern (line-beginning-position))
       (let ((line (match-string 0)))
@@ -1025,8 +1021,8 @@ Otherwise, just toggle read-only status."
             (errors inf-ruby-orig-error-regexp-alist))
         (funcall inf-ruby-orig-compilation-mode)
         (setq mode-line-process orig-mode-line-process)
-        (set (make-local-variable 'compilation-arguments) arguments)
-        (set (make-local-variable 'compilation-error-regexp-alist) errors)
+        (setq-local compilation-arguments arguments)
+        (setq-local compilation-error-regexp-alist errors)
         (when proc
           (set-process-filter proc filter)))
     (read-only-mode)))