X-Git-Url: https://code.delx.au/gnu-emacs-elpa/blobdiff_plain/5c540d26479df04e7fc6b99792707457df174528:/sotlisp.el..af815663b8a7f52f7af8effaecdb887dca17ba0a:/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 f77f0aca9..f1536a076 100644 --- a/sotlisp.el +++ b/packages/sotlisp/sotlisp.el @@ -1,8 +1,8 @@ ;;; sotlisp.el --- Write lisp at the speed of thought. -*- lexical-binding: t; -*- -;; Copyright (C) 2014 Free Software Foundation, Inc. +;; Copyright (C) 2014, 2015 Free Software Foundation, Inc. -;; Author: Artur Malabarba +;; Author: Artur Malabarba ;; URL: https://github.com/Malabarba/speed-of-thought-lisp ;; Keywords: convenience, lisp ;; Package-Requires: ((emacs "24.1")) @@ -525,8 +525,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) @@ -686,4 +685,3 @@ With a prefix argument N, (un)comment that many sexps." (provide 'sotlisp) ;;; sotlisp.el ends here -