(allout-resolve-xref): Fix typos in error strings.

(allout-before-change-protect): Remove unneeded `concat'.

diff --git a/lisp/allout.el b/lisp/allout.el
index 2c02397bd1af01a215a0707a5b304958c5f43476..7fd4a4088d75fb5181ee0fe5f0e6a413ccd32ba7 100644 (file)
--- a/lisp/allout.el
+++ b/lisp/allout.el
@@ -2218,8 +2218,7 @@ are exempt from this restriction."
                      (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 @@ by pops to non-distinctive yanks.  Bug..."
   (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