diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2010-01-02 02:03:48 +0100 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2010-01-02 02:03:48 +0100 |
| commit | db4a7382f0ee49338f9c52adb93cd16c4b93dcd3 (patch) | |
| tree | 9b1ffd8f685789d5e8becb3d6f4a405eff330137 /lisp/org/org.el | |
| parent | da14b7caecf13214dfe328cdb5a6a5532c41a644 (diff) | |
| download | emacs-db4a7382f0ee49338f9c52adb93cd16c4b93dcd3.tar.gz | |
lisp/org/org.el: Fix typos in error messages.
Diffstat (limited to 'lisp/org/org.el')
| -rw-r--r-- | lisp/org/org.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/org/org.el b/lisp/org/org.el index 325a5248dc6..5988c07e987 100644 --- a/lisp/org/org.el +++ b/lisp/org/org.el @@ -9019,7 +9019,7 @@ avoiding backtracing." (if fastp (progn (if (> level 19) - (error "Outline path failure, more than 19 levels.")) + (error "Outline path failure, more than 19 levels")) (loop for i from level upto 19 do (aset org-olpa i nil)) (prog1 @@ -10502,7 +10502,7 @@ scheduling will use the corresponding date." (org-add-log-setup 'redeadline nil old-date 'findpos org-log-redeadline)) (message "Deadline on %s" org-last-inserted-timestamp))))) - + (defun org-schedule (&optional remove time) "Insert the SCHEDULED: string with a timestamp to schedule a TODO item. With argument REMOVE, remove any scheduling date from the item. @@ -14985,7 +14985,7 @@ Some of the options can be changed using the variable "Show the available speed commands." (interactive) (if (not org-use-speed-commands) - (error "Speed commands are not activated, customize `org-use-speed-commands'.") + (error "Speed commands are not activated, customize `org-use-speed-commands'") (with-output-to-temp-buffer "*Help*" (princ "User-defined Speed commands\n===========================\n") (mapc 'org-print-speed-command org-speed-commands-user) @@ -15028,7 +15028,7 @@ overwritten, and the table is not marked as requiring realignment." (setq this-command org-speed-command) (call-interactively org-speed-command)) ((functionp org-speed-command) - (funcall org-speed-command)) + (funcall org-speed-command)) ((and org-speed-command (listp org-speed-command)) (eval org-speed-command)) (t (let (org-use-speed-commands) @@ -16188,7 +16188,7 @@ Your bug report will be posted to the Org-mode mailing list. (save-excursion (if (re-search-backward "^\\(Subject: \\)Org-mode version \\(.*?\\);[ \t]*\\(.*\\)" nil t) (replace-match "\\1Bug: \\3 [\\2]"))))) - + (defun org-install-agenda-files-menu () (let ((bl (buffer-list))) |