mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-01 12:17:25 -05:00
tmux: string-split -> split-string
This commit is contained in:
@ -108,8 +108,8 @@ but do not execute them."
|
|||||||
(if session
|
(if session
|
||||||
(concat "-t " (car session))
|
(concat "-t " (car session))
|
||||||
"-a")))))
|
"-a")))))
|
||||||
(cl-loop for line in (string-split lines "\n" t)
|
(cl-loop for line in (split-string lines "\n" t)
|
||||||
collect (let ((window (string-split line ";")))
|
collect (let ((window (split-string line ";")))
|
||||||
(list (nth 0 window)
|
(list (nth 0 window)
|
||||||
:session-id (nth 1 window)
|
:session-id (nth 1 window)
|
||||||
:name (nth 3 window)
|
:name (nth 3 window)
|
||||||
@ -126,7 +126,7 @@ but do not execute them."
|
|||||||
"-t "
|
"-t "
|
||||||
(car sess-or-win))
|
(car sess-or-win))
|
||||||
"-a")))))
|
"-a")))))
|
||||||
(cl-loop for line in (string-split lines "\n" t)
|
(cl-loop for line in (split-string lines "\n" t)
|
||||||
collect (let ((pane (split-string line ";")))
|
collect (let ((pane (split-string line ";")))
|
||||||
(list (nth 0 pane)
|
(list (nth 0 pane)
|
||||||
:window-id (nth 1 pane)
|
:window-id (nth 1 pane)
|
||||||
|
Reference in New Issue
Block a user