+ (if (or (not function)
+ (and (> (point) (1+ (point-min)))
+ (or (save-excursion (backward-char 2) (looking-at "'("))
+ (keywordp (intern-soft function)))
+ (not (fboundp (intern-soft function)))))
The problem is, this will do the wrong thing when you edit
a call to a function defined in a file that isn't loaded.
It might be better to check for a quote in front of
the current list or a surrounding list. That could work reliably.
_______________________________________________
Emacs-devel mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-devel
