summaryrefslogtreecommitdiff
path: root/orderless.el
diff options
context:
space:
mode:
Diffstat (limited to 'orderless.el')
-rw-r--r--orderless.el4
1 files changed, 4 insertions, 0 deletions
diff --git a/orderless.el b/orderless.el
index ead96ea..82fbcd8 100644
--- a/orderless.el
+++ b/orderless.el
@@ -292,6 +292,10 @@ converted to a list of regexps according to the value of
for string = (copy-sequence original)
collect (orderless--highlight regexps string)))
+(defun orderless--forgiving-funcall (fn &rest args)
+ "Call FN with as many ARGS as its arity allows."
+ (apply fn (cl-subseq args 0 (cdr (func-arity fn)))))
+
(defun orderless--component-regexps (pattern)
"Build regexps to match PATTERN.
Consults `orderless-style-dispatchers' and, if