Mercurial > emacs

changeset 64428:e55dd693f95b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(allout-resolve-xref): Fix typos in error strings. (allout-before-change-protect): Remove unneeded `concat'.
author Juanma Barranquero <lekktu@gmail.com>
date Mon, 18 Jul 2005 09:03:05 +0000
parents 6cc1090d14f2
children dd1d759e63db
files lisp/allout.el
diffstat 1 files changed, 3 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/allout.el	Mon Jul 18 05:42:23 2005 +0000
+++ b/lisp/allout.el	Mon Jul 18 09:03:05 2005 +0000
@@ -2218,8 +2218,7 @@
 		      (if rehide-place (goto-char rehide-place))
 		      (allout-hide-current-entry-completely))
 		  (allout-hide-current-entry))
-		(error (concat
-			"Change within concealed region prevented.")))))))
+		(error "Change within concealed region prevented."))))))
     )	; if
   )	; defun
 ;;;_   = allout-post-goto-bullet
@@ -3426,9 +3425,9 @@
   (interactive)
   (if (not allout-file-xref-bullet)
       (error
-       "outline cross references disabled - no `allout-file-xref-bullet'")
+       "Outline cross references disabled - no `allout-file-xref-bullet'")
     (if (not (string= (allout-current-bullet) allout-file-xref-bullet))
-        (error "current heading lacks cross-reference bullet `%s'"
+        (error "Current heading lacks cross-reference bullet `%s'"
                allout-file-xref-bullet)
       (let (file-name)
         (save-excursion