[Emacs-diffs] Changes to emacs/lisp/allout.el

[Juanma Barranquero]

Index: emacs/lisp/allout.el
diff -c emacs/lisp/allout.el:1.56 emacs/lisp/allout.el:1.57
*** emacs/lisp/allout.el:1.56   Sat Jul 16 19:15:06 2005
--- emacs/lisp/allout.el        Mon Jul 18 09:03:05 2005
***************
*** 2218,2225 ****
                      (if rehide-place (goto-char rehide-place))
                      (allout-hide-current-entry-completely))
                  (allout-hide-current-entry))
!               (error (concat
!                       "Change within concealed region prevented.")))))))
      ) ; if
    )   ; defun
  ;;;_   = allout-post-goto-bullet
--- 2218,2224 ----
                      (if rehide-place (goto-char rehide-place))
                      (allout-hide-current-entry-completely))
                  (allout-hide-current-entry))
!               (error "Change within concealed region prevented."))))))
      ) ; if
    )   ; defun
  ;;;_   = allout-post-goto-bullet
***************
*** 3426,3434 ****
    (interactive)
    (if (not allout-file-xref-bullet)
        (error
!        "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'"
                 allout-file-xref-bullet)
        (let (file-name)
          (save-excursion
--- 3425,3433 ----
    (interactive)
    (if (not allout-file-xref-bullet)
        (error
!        "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'"
                 allout-file-xref-bullet)
        (let (file-name)
          (save-excursion