Procházet zdrojové kódy

Merge branch 'maint'

Kyle Meyer před 10 roky
rodič
revize
666fd99175
1 změnil soubory, kde provedl 3 přidání a 1 odebrání
  1. 3 1
      lisp/org.el

+ 3 - 1
lisp/org.el

@@ -16772,7 +16772,9 @@ So these are more for recording a certain time/date."
     (org-defkey map (kbd ".")
                 (lambda () (interactive)
 		  ;; Are we at the beginning of the prompt?
-		  (if (org-looking-back "^[^:]+: " (line-beginning-position))
+		  (if (org-looking-back "^[^:]+: "
+					(let ((inhibit-field-text-motion t))
+					  (line-beginning-position)))
 		      (org-eval-in-calendar '(calendar-goto-today))
 		    (insert "."))))
     (org-defkey map (kbd "C-.")