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

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

[nongnu] elpa/sly fa3bcf0237 7/7: Don't accidentally concatenate symbols


From: ELPA Syncer
Subject: [nongnu] elpa/sly fa3bcf0237 7/7: Don't accidentally concatenate symbols in sly-package-fu--insert-symbol
Date: Tue, 25 Apr 2023 18:01:37 -0400 (EDT)

branch: elpa/sly
commit fa3bcf0237b420d1a3b1670eb35d7c5f96f94c62
Author: João Távora <joaotavora@gmail.com>
Commit: João Távora <joaotavora@gmail.com>

    Don't accidentally concatenate symbols in sly-package-fu--insert-symbol
    
    Related to #560.
    
    * contrib/sly-package-fu.el (sly-package-fu--insert-symbol): Fix.
---
 contrib/sly-package-fu.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/contrib/sly-package-fu.el b/contrib/sly-package-fu.el
index 5357843d9e..3ac8c05b12 100644
--- a/contrib/sly-package-fu.el
+++ b/contrib/sly-package-fu.el
@@ -285,7 +285,8 @@ already exported/unexported."
   (let ((symbol-name (sly-format-symbol-for-defpackage symbol-name)))
     (unless (looking-back "^\\s-*" (line-beginning-position) nil)
       (newline-and-indent))
-    (insert symbol-name)))
+    (insert symbol-name)
+    (when (looking-at "\\s_") (insert " "))))
 
 (defun sly-remove-export (symbol-name)
   ;; Assumes we're inside the beginning of a DEFPACKAGE form.



reply via email to

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