summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJoost Kremers <joostkremers@fastmail.fm>2017-03-10 23:19:53 +0100
committerJoost Kremers <joostkremers@fastmail.fm>2017-03-10 23:19:53 +0100
commitc431231225c0860c848e4ab1454a65dd354228c1 (patch)
treed06e6a4414b5ce2ba2e5baa2f81d3eba16e69d34
parentfb5d64cae07d6b2d93ad10fdeda3336fb6ca0973 (diff)
Don't move one char back in parsebib--match-elim
-rw-r--r--parsebib.el10
1 files changed, 2 insertions, 8 deletions
diff --git a/parsebib.el b/parsebib.el
index c97ce26..08dc51b 100644
--- a/parsebib.el
+++ b/parsebib.el
@@ -120,19 +120,13 @@ point right before the closing delimiter (unlike e.g.,
(defun parsebib--match-delim-forward ()
"Move forward to the closing delimiter matching the delimiter at point.
This function handles braces {} and double quotes \"\". Return t
-if a matching delimiter was found. Note that this function puts
-point right before the closing delimiter (unlike e.g.,
-`forward-sexp', which puts it right after.)"
+if a matching delimiter was found."
(let ((result (cond
((eq (char-after) ?\{)
(parsebib--match-brace-forward))
((eq (char-after) ?\")
(parsebib--match-quote-forward)))))
- (when result
- ;; move point one char back to place it where the rest of parsebib expects it
- (forward-char -1)
- ;; make sure we return t
- result)))
+ result))
(defun parsebib--match-brace-forward ()
"Move forward to the closing brace matching the opening brace at point."