# HG changeset patch
# User Deepak Goel <deego@gnufans.org>
# Date 1196966623 0
# Node ID 5db60f420c857353e124237a251fc2bac5a09af6
# Parent  e1c8546ca1d56d35bdb5993f601cc083b33bff53
Fix buggy `error' calls in textmode/

diff -r e1c8546ca1d5 -r 5db60f420c85 lisp/ChangeLog
--- a/lisp/ChangeLog	Thu Dec 06 18:36:46 2007 +0000
+++ b/lisp/ChangeLog	Thu Dec 06 18:43:43 2007 +0000
@@ -1,5 +1,11 @@
 2007-12-06  D. Goel  <deego3@gmail.com>
 
+	* textmodes/reftex.el (reftex-TeX-master-file): Ditto.
+
+	* textmodes/org.el (org-paste-subtree): Ditto.
+
+	* textmodes/ispell.el (ispell-process-line): Ditto.
+
 	* progmodes/vhdl-mode.el (vhdl-template-modify): Ditto.
 
 	* progmodes/idlw-shell.el (idlwave-shell-send-command): Ditto.
diff -r e1c8546ca1d5 -r 5db60f420c85 lisp/textmodes/ispell.el
--- a/lisp/textmodes/ispell.el	Thu Dec 06 18:36:46 2007 +0000
+++ b/lisp/textmodes/ispell.el	Thu Dec 06 18:43:43 2007 +0000
@@ -3063,7 +3063,7 @@
 	    ;; `query-replace' makes multiple corrections on the starting line.
 	    (or (ispell-looking-at (car poss))
 		;; This occurs due to filter pipe problems
-		(error (concat "Ispell misalignment: word "
+		(error "%s" (concat "Ispell misalignment: word "
 			       "`%s' point %d; probably incompatible versions")
 		       (car poss) (marker-position word-start)))
 	    ;; ispell-cmd-loop can go recursive & change buffer
diff -r e1c8546ca1d5 -r 5db60f420c85 lisp/textmodes/org.el
--- a/lisp/textmodes/org.el	Thu Dec 06 18:36:46 2007 +0000
+++ b/lisp/textmodes/org.el	Thu Dec 06 18:43:43 2007 +0000
@@ -6076,7 +6076,7 @@
 If optional TREE is given, use this text instead of the kill ring."
   (interactive "P")
   (unless (org-kill-is-subtree-p tree)
-    (error
+    (error "%s"
      (substitute-command-keys
       "The kill is not a (set of) tree(s) - please use \\[yank] to yank anyway")))
   (let* ((txt (or tree (and kill-ring (current-kill 0))))
diff -r e1c8546ca1d5 -r 5db60f420c85 lisp/textmodes/reftex.el
--- a/lisp/textmodes/reftex.el	Thu Dec 06 18:36:46 2007 +0000
+++ b/lisp/textmodes/reftex.el	Thu Dec 06 18:43:43 2007 +0000
@@ -705,7 +705,7 @@
          ((fboundp 'TeX-master-file) ; AUCTeX is loaded.  Use its mechanism.
           (condition-case nil 
               (TeX-master-file t)
-            (error (buffer-file-name))))
+            (error "%s" (buffer-file-name))))
          ((fboundp 'tex-main-file) (tex-main-file)) ; Emacs LaTeX mode
          ((boundp 'TeX-master)       ; The variable is defined - lets use it.
           (cond