diff options
| author | Kyle Meyer <kyle@kyleam.com> | 2014-12-09 00:13:06 -0500 |
|---|---|---|
| committer | Kyle Meyer <kyle@kyleam.com> | 2014-12-09 00:13:06 -0500 |
| commit | 9c4ae54b1fadd2644aeafdc85bbbd8084b7a9f45 (patch) | |
| tree | f99fce41c49130f388f8b75fc9c81b308a203864 /bog.el | |
| parent | e90f9ca45f324f59bfabc501e7d65e0bab8a6add (diff) | |
| download | bog-9c4ae54b1fadd2644aeafdc85bbbd8084b7a9f45.tar.gz | |
bog-citekey-p: Return string-match-p result directly
Diffstat (limited to 'bog.el')
| -rw-r--r-- | bog.el | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -287,9 +287,8 @@ be preceded by a characters in `bog-allowed-before-citekey'." it))) (defun bog-citekey-p (text) - "Does TEXT match `bog-citekey-format'?" - (and (string-match-p (format "^%s$" bog-citekey-format) text) - t)) + "Return non-nil if TEXT matches `bog-citekey-format'." + (string-match-p (format "^%s$" bog-citekey-format) text)) (defvar bog--all-citekeys nil) (defun bog-all-citekeys () |