ryuslash/dispass.el
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Improve label repexp

Browse source 
* dispass.el (dispass-labels--refresh): Change the regular expression
  used to allow `-' and `_' in the label names.
This commit is contained in:
Tom Willemsen 2012-07-08 16:02:14 +02:00
parent e1a25a2078
commit d7d34799d4
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
dispass.el
View file

@ -216,7 +216,7 @@ an eye out for LABEL."
(with-temp-buffer (with-temp-buffer
(insert-file-contents dispass-file) (insert-file-contents dispass-file)
(while (re-search-forward (while (re-search-forward
"\\(\\w+\\) .*length=\\([0-9]+\\) .*hash=\\(\\w+\\)$" "\\(\\(?:\\sw\\|\\s_\\)+\\) .*length=\\([0-9]+\\) .*hash=\\(\\sw+\\)$"
nil t) nil t)
(add-to-list 'tmp-list `(,(match-string 1) (add-to-list 'tmp-list `(,(match-string 1)
[(,(match-string 1) [(,(match-string 1)