summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien Guerry <bzg@altern.org>2011-08-15 10:06:02 +0200
committerBastien Guerry <bzg@altern.org>2011-08-15 10:06:02 +0200
commite01ce26c0bed630a1656fde8552e268d477326f8 (patch)
tree3062fb143e3b853406969d774bea169f8b1aadd2
parentc6bee1143345f7f3d7427731c474aecf32953ad9 (diff)
downloadorg-mode-e01ce26c0bed630a1656fde8552e268d477326f8.tar.gz
org.el: set `org-ts-what' correctly in `org-at-timestamp-p'.
(org-at-timestamp-p): set `org-ts-what' in a way that point will be considered to be "on the bracket" whether it is really on it or right after it. Thanks to Matt Lundin for reporting this and to Nicolas Goaziou for discussion about this.
-rw-r--r--lisp/org.el5
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/org.el b/lisp/org.el
index f40f46c..4de51b9 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -15586,7 +15586,10 @@ With prefix ARG, change that many days."
(setq org-ts-what
(cond
((= pos (match-beginning 0)) 'bracket)
- ((= pos (1- (match-end 0))) 'bracket)
+ ;; Point is considered to be "on the bracket" whether
+ ;; it's really on it or right after it.
+ ((or (= pos (1- (match-end 0)))
+ (= pos (match-end 0))) 'bracket)
((org-pos-in-match-range pos 2) 'year)
((org-pos-in-match-range pos 3) 'month)
((org-pos-in-match-range pos 7) 'hour)