emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/iedit 14376a97e0 223/301: Ignore error in `iedit-mark-sgml


From: ELPA Syncer
Subject: [nongnu] elpa/iedit 14376a97e0 223/301: Ignore error in `iedit-mark-sgml-pair'
Date: Mon, 10 Jan 2022 22:59:04 -0500 (EST)

branch: elpa/iedit
commit 14376a97e08c77f872720226bd0a2ab0157606c4
Author: Victor Ren <victorhge@gmail.com>
Commit: Victor Ren <victorhge@gmail.com>

    Ignore error in `iedit-mark-sgml-pair'
---
 iedit.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/iedit.el b/iedit.el
index 412c38d6fd..4e54cbd7d9 100644
--- a/iedit.el
+++ b/iedit.el
@@ -2,7 +2,7 @@
 
 ;; Copyright (C) 2010, 2011, 2012 Victor Ren
 
-;; Time-stamp: <2016-06-22 23:58:50 Victor Ren>
+;; Time-stamp: <2016-06-23 13:55:31 Victor Ren>
 ;; Author: Victor Ren <victorhge@gmail.com>
 ;; Keywords: occurrence region simultaneous refactoring
 ;; Version: 0.9.9
@@ -485,6 +485,7 @@ The code is adpated from
 `sgml-electric-tag-pair-before-change-function'.
 
 Return the tag if succeeded, nil if failed."
+  (condition-case err
   (save-excursion
     (skip-chars-backward "[:alnum:]-_.:")
     (if  (or (eq (char-before) ?<)
@@ -512,7 +513,8 @@ Return the tag if succeeded, nil if failed."
                      (or (not endp) (eq (char-after cl-end) ?>)))
             (push (cons cl-start cl-end) iedit-occurrences-overlays)
             (push (cons (point) (+ (point) (- cl-end cl-start))) 
iedit-occurrences-overlays)
-            (buffer-substring cl-start cl-end))))))
+            (buffer-substring cl-start cl-end)))))
+  (error nil)))
 
 (defun iedit-done ()
   "Exit Iedit mode.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]