# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1262394228 -3600
# Node ID 9084997e41f65ead70de6dcd22810897d122bc62
# Parent  a05636ead18a29a4a65fd4c172d7f01ad5acd0a1
lisp/org/org.el: Fix typos in error messages.

diff -r a05636ead18a -r 9084997e41f6 lisp/org/ChangeLog
--- a/lisp/org/ChangeLog	Sat Jan 02 02:03:11 2010 +0100
+++ b/lisp/org/ChangeLog	Sat Jan 02 02:03:48 2010 +0100
@@ -1,3 +1,8 @@
+2010-01-01  Juanma Barranquero  <lekktu@gmail.com>
+
+	* org.el (org-get-outline-path, org-speed-command-help):
+	Fix typos in error messages.
+
 2009-12-14  Juri Linkov  <juri@jurta.org>
 
 	* org-html.el (org-export-html-style-include-default):
diff -r a05636ead18a -r 9084997e41f6 lisp/org/org.el
--- a/lisp/org/org.el	Sat Jan 02 02:03:11 2010 +0100
+++ b/lisp/org/org.el	Sat Jan 02 02:03:48 2010 +0100
@@ -9019,7 +9019,7 @@
   (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 @@
 	  (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 @@
   "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 @@
       (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 @@
     (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)))