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

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

[nongnu] elpa/inf-ruby 37bae51429 015/265: Replace pointless setfs with


From: ELPA Syncer
Subject: [nongnu] elpa/inf-ruby 37bae51429 015/265: Replace pointless setfs with setqs.
Date: Sat, 9 Jul 2022 21:59:10 -0400 (EDT)

branch: elpa/inf-ruby
commit 37bae51429e6cdc664967ce12fa482c245d1af99
Author: Cornelius Mika <cornelius.mika@gmail.com>
Commit: Cornelius Mika <cornelius.mika@gmail.com>

    Replace pointless setfs with setqs.
    
    This must be an artifact of the original author's familiarity with CL.
---
 inf-ruby.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/inf-ruby.el b/inf-ruby.el
index 94c33fa958..ebb6389b83 100755
--- a/inf-ruby.el
+++ b/inf-ruby.el
@@ -334,12 +334,12 @@ Then switch to the process buffer."
   (let* ((proc (get-buffer-process inf-ruby-buffer))
         (comint-filt (process-filter proc))
         (kept "") completions)
-    (set-process-filter proc (lambda (proc string) (setf kept (concat kept 
string))))
+    (set-process-filter proc (lambda (proc string) (setq kept (concat kept 
string))))
     (process-send-string proc (format "puts 
IRB::InputCompletor::CompletionProc.call('%s').compact\n"
                                       (ruby-escape-single-quoted seed)))
     (while (and (not (string-match inf-ruby-prompt-pattern kept))
                 (accept-process-output proc 2)))
-    (setf completions (cdr (butlast (split-string kept "\r?\n") 2)))
+    (setq completions (cdr (butlast (split-string kept "\r?\n") 2)))
     (set-process-filter proc comint-filt)
     completions))
 



reply via email to

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