[Emacs-diffs] master 6d0f7f7: Fix a dns-mode reentrancy bug

[Paul Eggert]

branch: master
commit 6d0f7f708a32aeb994a86d68a5d05c399aba319a
Author: Paul Eggert <address@hidden>
Commit: Paul Eggert <address@hidden>

    Fix a dns-mode reentrancy bug
    
    * lisp/textmodes/dns-mode.el (dns-mode-ipv6-to-nibbles):
    Don’t assume kill-new does no matching.
---
 lisp/textmodes/dns-mode.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/textmodes/dns-mode.el b/lisp/textmodes/dns-mode.el
index b303e19..1dbc7bd 100644
--- a/lisp/textmodes/dns-mode.el
+++ b/lisp/textmodes/dns-mode.el
@@ -292,9 +292,9 @@ Examples:
   (skip-syntax-backward " ")
   (skip-syntax-backward "w_.")
   (re-search-forward "\\([[:xdigit:]:]+\\)\\(/-?[0-9]\\{2,3\\}\\)?")
-  (kill-new (match-string 0))
   (let ((address (match-string 1))
         (prefix-length (match-string 2)))
+    (kill-new (match-string 0))
     (when prefix-length
       (setq prefix-length (string-to-number (substring prefix-length 1)))
       (if negate-prefix