summaryrefslogtreecommitdiff
path: root/bog.el
diff options
context:
space:
mode:
Diffstat (limited to 'bog.el')
-rw-r--r--bog.el4
1 files changed, 4 insertions, 0 deletions
diff --git a/bog.el b/bog.el
index 1891eec..5d20cfe 100644
--- a/bog.el
+++ b/bog.el
@@ -194,6 +194,10 @@ be called with no arguments. If CONTEXT-METHOD returns nil or if
NO-CONTEXT is non-nil, the user will be prompted with citekeys
gathered by COLLECTION-METHOD."
`(defun ,(intern (concat "bog-citekey-from-" name)) (no-context)
+ ,(format "Select citekey with `%s', falling back on `%s'.
+If NO-CONTEXT is non-nil, immediately fall back."
+ (symbol-name context-method)
+ (symbol-name collection-method))
(or (and no-context (bog-select-citekey (,collection-method)))
(,context-method)
(bog-select-citekey (,collection-method)))))