summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorAndreas Politz <politza@hochschule-trier.de>2015-02-17 10:28:20 +0100
committerAndreas Politz <politza@hochschule-trier.de>2015-02-17 10:28:20 +0100
commit0aa2d309b242ed264f9a2bd4392ff0dfe307d389 (patch)
treeec2a8b57beaf5a0dd6138021df8f332f928fab60 /lisp
parent99bcc3a35c8a25668bfa10278cd5c0a37449144e (diff)
Better handle whitespace.
* lisp/pdf-sync.el (pdf-sync-backward--tokenize): Skip whitespace if necessary.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/pdf-sync.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/pdf-sync.el b/lisp/pdf-sync.el
index a51c314..1825211 100644
--- a/lisp/pdf-sync.el
+++ b/lisp/pdf-sync.el
@@ -507,6 +507,8 @@ point to the correct position."
(skip-chars-forward "^ ")
(skip-chars-forward " "))
(goto-char center)
+ (when (eq ?\s (char-after))
+ (skip-chars-backward " "))
(setq chindex (- (skip-chars-backward "^ ")))
(setq words (split-string (buffer-string)))
(when translation