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

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

[nongnu] elpa/evil-matchit 3f08492ec4 072/244: FIXED: #43 no jump at the


From: ELPA Syncer
Subject: [nongnu] elpa/evil-matchit 3f08492ec4 072/244: FIXED: #43 no jump at the first line in html v1.5.2
Date: Thu, 6 Jan 2022 02:58:50 -0500 (EST)

branch: elpa/evil-matchit
commit 3f08492ec4c751a3a1f74cec751cbf5e15e007c5
Author: Chen Bin <chenbin.sh@gmail.com>
Commit: Chen Bin <chenbin.sh@gmail.com>

    FIXED: #43 no jump at the first line in html v1.5.2
---
 README.org           |  2 +-
 evil-matchit-html.el | 18 +++++++++++-------
 evil-matchit-pkg.el  |  2 +-
 evil-matchit.el      |  4 ++--
 pkg.sh               |  2 +-
 5 files changed, 16 insertions(+), 12 deletions(-)

diff --git a/README.org b/README.org
index 80ffd017a3..8d1cdefe79 100644
--- a/README.org
+++ b/README.org
@@ -1,4 +1,4 @@
-* evil-matchit (v1.5.1)
+* evil-matchit (v1.5.2)
 
 Vim [[http://www.vim.org/scripts/script.php?script_id=39][matchit.vim]] by 
Benji Fisher ported into Emacs.
 
diff --git a/evil-matchit-html.el b/evil-matchit-html.el
index 1ee81a7229..7a3220b402 100644
--- a/evil-matchit-html.el
+++ b/evil-matchit-html.el
@@ -35,6 +35,7 @@
 (defun evilmi-html-get-tag ()
   (let ((b (line-beginning-position))
         (e (line-end-position))
+        (looping t)
         (html-tag-char (string-to-char "<"))
         (char (following-char))
         (p (point))
@@ -43,13 +44,16 @@
 
     (save-excursion
       ;; search backward
-      (if (not (= char html-tag-char))
-          (while (and (<= b (point)) (not (= char 60)))
-            (setq char (following-char))
-            (setq p (point))
-            (backward-char)
-            )
-        )
+      (unless (= char html-tag-char)
+        (while (and looping (<= b (point)) (not (= char 60)))
+          (setq char (following-char))
+          (setq p (point))
+          (if (= p (point-min))
+              ;; need get out of loop anyway
+              (setq looping nil)
+            (backward-char))
+          ))
+
       ;; search forward
       (if (not (= char html-tag-char))
           (save-excursion
diff --git a/evil-matchit-pkg.el b/evil-matchit-pkg.el
index 6e122e0938..bd1aa8c8a1 100644
--- a/evil-matchit-pkg.el
+++ b/evil-matchit-pkg.el
@@ -1,2 +1,2 @@
-(define-package "evil-matchit" "1.5.1"
+(define-package "evil-matchit" "1.5.2"
                 "Vim matchit ported into Emacs (requires EVIL)")
diff --git a/evil-matchit.el b/evil-matchit.el
index 81bb8e40c4..480b650387 100644
--- a/evil-matchit.el
+++ b/evil-matchit.el
@@ -4,7 +4,7 @@
 
 ;; Author: Chen Bin <chenbin.sh@gmail.com>
 ;; URL: http://github.com/redguardtoo/evil-matchit
-;; Version: 1.5.1
+;; Version: 1.5.2
 ;; Keywords: matchit vim evil
 ;; Package-Requires: ((evil "1.0.7"))
 ;;
@@ -272,7 +272,7 @@ If this flag is nil, then 50 means jump 50 times.")
    ))
 
 ;;;###autoload
-(defun evilmi-version() (interactive) (message "1.5.1"))
+(defun evilmi-version() (interactive) (message "1.5.2"))
 
 ;;;###autoload
 (define-minor-mode evil-matchit-mode
diff --git a/pkg.sh b/pkg.sh
index 2c558dda9a..cbc54875f7 100755
--- a/pkg.sh
+++ b/pkg.sh
@@ -1,5 +1,5 @@
 #!/bin/bash
-pkg=evil-matchit-1.5.1
+pkg=evil-matchit-1.5.2
 mkdir $pkg
 cp README.org $pkg
 cp *.el $pkg



reply via email to

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