* static.el (static-condition-case): Wrap lambda expression by

[elisp/apel.git] / calist.el

diff --git a/calist.el b/calist.el
index 634ae97..88c6ec4 100644 (file)
--- a/calist.el
+++ b/calist.el
@@ -81,7 +81,7 @@
          ((equal (cdr s-field) field-value)
           calist))))
 
-(define-calist-field-match-method t #'calist-default-field-match-method)
+(define-calist-field-match-method t (function calist-default-field-match-method))
 
 (defsubst calist-field-match-method (field-type)
   (symbol-function