Browse Source
Fix the regexp for finding contacts in khard output
* khardel.el (khardel--list-contacts): Allow dashes in UUIDs.
pull/3/head
No known key found for this signature in database
GPG Key ID: E8BCD7866AFCF978
1 changed files with
1 additions and
1 deletions
-
khardel.el
|
|
@ -53,7 +53,7 @@ |
|
|
|
(goto-char (point-min)) |
|
|
|
(let ((contacts (make-hash-table :test 'equal))) |
|
|
|
(cl-loop |
|
|
|
while (re-search-forward "^\\([a-z0-9]*\\)\t\\(.*\\)\t[^\t]*$" nil t) |
|
|
|
while (re-search-forward "^\\([-a-z0-9]*\\)\t\\(.*\\)\t[^\t]*$" nil t) |
|
|
|
do (map-put contacts (match-string 2) (cons (match-string 1) (match-string 2))) |
|
|
|
finally return contacts))))) |
|
|
|
|
|
|
|