[nongnu] elpa/helm c58ef324ca 4/4: Fix regexps starting with ^ and containing an escaped space

[ELPA Syncer]

branch: elpa/helm
commit c58ef324cadefbd423ec2b7bb91af793daf6d159
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>

    Fix regexps starting with ^ and containing an escaped space
    
    in helm-occur.  Without this change escaped spaces are stripped from 
pattern.
---
 helm-occur.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/helm-occur.el b/helm-occur.el
index 9717093ab5..be2e6419b7 100644
--- a/helm-occur.el
+++ b/helm-occur.el
@@ -352,7 +352,7 @@ When GSHORTHANDS is nil use PATTERN unmodified."
                     (match-string 2 candidate)))
                 :diacritics helm-occur-ignore-diacritics
                 :search (lambda (pattern)
-                          (when (string-match "\\`\\^\\([^ ]*\\)" pattern)
+                          (when (string-match "\\`\\^\\(.*\\)" pattern)
                             (setq pattern (concat "^[0-9]*\\s-" (match-string 
1 pattern))))
                           (condition-case _err
                               (re-search-forward pattern nil t)