X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/2841c4413eceed257c7f79ab0d47d2034d472391:/sotlisp.el..957733f454c75b14da84e8e0732459873622394d:/packages/sotlisp/sotlisp.el diff --git a/sotlisp.el b/packages/sotlisp/sotlisp.el similarity index 99% rename from sotlisp.el rename to packages/sotlisp/sotlisp.el index c466e10a3..09728cb11 100644 --- a/sotlisp.el +++ b/packages/sotlisp/sotlisp.el @@ -531,8 +531,7 @@ removes hooks and abbrevs." (looking-at-p "#'"))) (thing-at-point 'symbol) (let ((fcap (function-called-at-point))) - (if fcap - (symbol-name fcap) + (if fcap (symbol-name fcap) (thing-at-point 'symbol))))) (defun sotlisp-find-or-define-function (&optional prefix)