> --- 897,915 ---- > ;; Show preceding or following hidden tag, depending of cursor > direction. > (let ((inhibit-point-motion-hooks t)) > (save-excursion > ! (condition-case nil > ! (message "Invisible tag: %s" > ! ;; Strip properties, otherwise, the text is invisible. > ! (buffer-substring-no-properties > ! (point) > ! (if (or (and (> x y) > ! (not (eq (following-char) ?<))) > ! (and (< x y) > ! (eq (preceding-char) ?>))) > ! (backward-list) > ! (forward-list)))) > ! (error nil))))) > !
For utmost clarity, I'd just use `ignore-errors' here. (cl is already used for compiling sgml-mode.el.) Davis -- This product is sold by volume, not by mass. If it appears too dense or too sparse, it is because mass-energy conversion has occurred during shipping. _______________________________________________ emacs-pretest-bug mailing list [email protected] http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug
