fix: don't need this function anymore

This commit is contained in:
Joao Tavora 2013-11-02 13:25:43 +00:00
parent 4ece494427
commit 782c57985b

View File

@ -50,13 +50,6 @@
(defvar snippet--form-mirror-sym-idx nil) (defvar snippet--form-mirror-sym-idx nil)
(defun snippet--function-p (form)
(or (functionp form)
(and (eq 'function (car form))
(fboundp (cl-second form)))
(and (eq 'quote (car form))
(fboundp (cl-second form)))))
(defun snippet--canonicalize-form (form) (defun snippet--canonicalize-form (form)
(pcase form (pcase form
((or `&field `(&field)) ((or `&field `(&field))