From: Christophe Rhodes <csr21@cantab.net>
Date: Tue, 21 Oct 2014 21:04:26 +0000 (+0100)
Subject: include underscore as a valid character in plist keys
X-Git-Url: http://christophe.rhodes.io/gitweb/?a=commitdiff_plain;h=2ab68ce2ad79bb222c28cceeeef7dfead4750b27;p=squeeze-el.git

include underscore as a valid character in plist keys
---

diff --git a/squeeze.el b/squeeze.el
index 33be451..dbab10e 100644
--- a/squeeze.el
+++ b/squeeze.el
@@ -339,7 +339,7 @@
   (save-match-data
     (let (result)
       (loop
-       (if (string-match "\\([a-z]+\\)%3A\\([^ \n]+\\)" string start)
+       (if (string-match "\\([a-z_]+\\)%3A\\([^ \n]+\\)" string start)
            (let ((mend (match-end 0)))
              (when (> mend end)
                (return))