fix
This commit is contained in:
2
rbw.el
2
rbw.el
@@ -71,8 +71,8 @@
|
||||
(string-match "\\([^:]*\\)$" output)
|
||||
(let* ((trimmed (string-trim (match-string 1 output)))
|
||||
(splitted (split-string trimmed ", "))
|
||||
(splitted (cl-remove-if-not (lambda (x) (string-match "@" x)) splitted))
|
||||
(ending (concat "@" selected))
|
||||
(splitted (cl-remove-if-not (lambda (x) (string-match ending x)) splitted))
|
||||
(result-list '()))
|
||||
(dolist (element splitted)
|
||||
(push (car (split-string element ending)) result-list))
|
||||
|
||||
Reference in New Issue
Block a user