From ffc15b9138b66c1f00284181a4ef9eeaf9c3ac06 Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Thu, 13 Aug 2015 00:23:08 -0400 Subject: bog-citekey-p: Use string, not line, bounds --- bog.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/bog.el b/bog.el index 9d61c23..59b90d4 100644 --- a/bog.el +++ b/bog.el @@ -357,7 +357,7 @@ word constituents." (defun bog-citekey-p (text) "Return non-nil if TEXT matches `bog-citekey-format'." (let (case-fold-search) - (string-match-p (format "^%s$" bog-citekey-format) text))) + (string-match-p (format "\\`%s\\'" bog-citekey-format) text))) (defun bog-all-citekeys () "Return all citekeys in notes." -- cgit v1.2.3