[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/zones 3169815: * zones.el (zz-add-zones-matching-regexp
From: |
Stefan Monnier |
Subject: |
[elpa] externals/zones 3169815: * zones.el (zz-add-zones-matching-regexp): Bug fix |
Date: |
Tue, 30 Apr 2019 22:29:55 -0400 (EDT) |
branch: externals/zones
commit 3169815c323966ff8e252b44e3558d6d045243fe
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>
* zones.el (zz-add-zones-matching-regexp): Bug fix
Was adding complement before search hit as zone, instead of hit.
---
zones.el | 10 ++++++----
1 file changed, 6 insertions(+), 4 deletions(-)
diff --git a/zones.el b/zones.el
index d12a6dc..ca88d48 100644
--- a/zones.el
+++ b/zones.el
@@ -7,11 +7,11 @@
;; Author: Drew Adams
;; Maintainer: Drew Adams <address@hidden>
;; Created: Sun Apr 18 12:58:07 2010 (-0700)
-;; Version: 2019.4.7
+;; Version: 2019.4.30
;; Package-Requires: ()
-;; Last-Updated: Sun Apr 7 17:13:06 2019 (-0700)
+;; Last-Updated: Tue Apr 30 17:07:29 2019 (-0700)
;; By: dradams
-;; Update #: 3122
+;; Update #: 3127
;; URL: https://elpa.gnu.org/packages/zones.html
;; URL: https://www.emacswiki.org/emacs/download/zones.el
;; Doc URL: https://www.emacswiki.org/emacs/Zones
@@ -572,6 +572,8 @@
;;
;;(@* "Change Log")
;;
+;; 2019/04/30 dadams
+;; zz-add-zones-matching-regexp: Bug fix: was adding complement before
search hit as zone, instead of hit.
;; 2019/04/07 dadams
;; Added: zz-add-region-as-izone, zz-auto-add-region-as-izone-mode,
zz-auto-remove-empty-izones-flag,
;; zz-remove-empty-izones, zz-empty-zone-p, zz-same-position-p,
zz-numeric-position.
@@ -1580,7 +1582,7 @@ arg, and the parameters when called from Lisp."
(c-end (if beg (match-beginning 0) (min end
(point-max))))) ; Truncate.
(isearchp-add/remove-dim-overlay c-beg c-end 'ADD)
(cond ((not (string= "" hit-string))
- (zz-add-zone c-beg c-end variable not-buf-local-p
set-var-p)
+ (zz-add-zone hit-beg hit-end variable not-buf-local-p
set-var-p)
(isearchp-add/remove-dim-overlay hit-beg hit-end nil))
(t
(isearchp-add/remove-dim-overlay hit-beg hit-end 'ADD))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/zones 3169815: * zones.el (zz-add-zones-matching-regexp): Bug fix,
Stefan Monnier <=