X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/68160bad14b031b069f30f1bd494ba4f252321c1:/sotlisp.el..55aab326a1213fac44ff0ec2a8df34cc3f79e205:/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 9aca06a9c..a4cd9dca3 100644 --- a/sotlisp.el +++ b/packages/sotlisp/sotlisp.el @@ -545,8 +545,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)