Quellcode durchsuchen

org-list.el (org-sort-list): Don't move point when matching time values

* org-list.el (org-sort-list): Don't move point when matching
time values.

Thanks to Samuel Wales for reporting this bug.
Bastien Guerry vor 12 Jahren
Ursprung
Commit
7c466e470c
1 geänderte Dateien mit 4 neuen und 3 gelöschten Zeilen
  1. 4 3
      lisp/org-list.el

+ 4 - 3
lisp/org-list.el

@@ -2858,9 +2858,10 @@ ignores hidden links."
 		     ;; If it is a timer list, convert timer to seconds
 		     ((org-at-item-timer-p)
 		      (org-timer-hms-to-secs (match-string 1)))
-		     ((or (re-search-forward org-ts-regexp (point-at-eol) t)
-			  (re-search-forward org-ts-regexp-both
-					     (point-at-eol) t))
+		     ((or (save-excursion
+			    (re-search-forward org-ts-regexp (point-at-eol) t))
+			  (save-excursion (re-search-forward org-ts-regexp-both
+							     (point-at-eol) t)))
 		      (org-time-string-to-seconds (match-string 0)))
 		     (t (org-float-time now))))
 		   ((= dcst ?f)