|
@@ -16043,7 +16043,10 @@ If there is already a timestamp at the cursor, it will be
|
|
|
modified.
|
|
|
|
|
|
With two universal prefix arguments, insert an active timestamp
|
|
|
-with the current time without prompting the user."
|
|
|
+with the current time without prompting the user.
|
|
|
+
|
|
|
+When called from lisp, the timestamp is inactive if INACTIVE is
|
|
|
+non-nil."
|
|
|
(interactive "P")
|
|
|
(let* ((ts nil)
|
|
|
(default-time
|
|
@@ -16090,7 +16093,7 @@ with the current time without prompting the user."
|
|
|
" " repeater ">"))))
|
|
|
(message "Timestamp updated"))
|
|
|
((equal arg '(16))
|
|
|
- (org-insert-time-stamp (current-time) t))
|
|
|
+ (org-insert-time-stamp (current-time) t inactive))
|
|
|
(t
|
|
|
(setq time (let ((this-command this-command))
|
|
|
(org-read-date arg 'totime nil nil default-time default-input inactive)))
|