From 1768662e56241b20ea9274c28f0aba6f29d4b949 Mon Sep 17 00:00:00 2001
From: Christophe Rhodes <csr21@cantab.net>
Date: Fri, 21 Mar 2014 20:10:05 +0000
Subject: [PATCH] don't snarf newline characters in messages

---
 squeeze.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/squeeze.el b/squeeze.el
index c4c8b4e..4d45146 100644
--- a/squeeze.el
+++ b/squeeze.el
@@ -75,7 +75,7 @@
     (let (result)
       (loop
        (message "start: %d" start)
-       (if (string-match "\\([a-z]+\\)%3A\\([^ ]+\\)" string start)
+       (if (string-match "\\([a-z]+\\)%3A\\([^ \n]+\\)" string start)
            (let ((mend (match-end 0)))
              (when (> mend end)
                (return))
-- 
2.39.5