Refactor out more s.el dependency
This commit is contained in:
parent
3162c98a11
commit
dc9a7c9780
3 changed files with 5 additions and 5 deletions
|
@ -38,13 +38,13 @@
|
|||
(ivy--switch-buffer-action
|
||||
(s-chop-suffix
|
||||
"[+]"
|
||||
(substring buffer 0 (s-index-of " " buffer)))))
|
||||
(substring buffer 0 (string-match-p (regexp-quote " ") buffer)))))
|
||||
|
||||
(defun +ivy--select-buffer-other-window-action (buffer)
|
||||
(ivy--switch-buffer-other-window-action
|
||||
(s-chop-suffix
|
||||
"[+]"
|
||||
(substring buffer 0 (s-index-of " " buffer)))))
|
||||
(substring buffer 0 (string-match-p (regexp-quote " ") buffer)))))
|
||||
|
||||
;;;###autoload
|
||||
(defun +ivy/switch-workspace-buffer (&optional other-window-p)
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
# `(progn
|
||||
(setq-local pkgs (s-split "/" (s-chop-prefix (concat (doom-project-root) "lib/") (file-name-sans-extension buffer-file-name)) t))
|
||||
(setq-local pkgs (split-string (s-chop-prefix (concat (doom-project-root) "lib/") (file-name-sans-extension buffer-file-name)) "/" t))
|
||||
(setq-local pkgs-p (eq (length pkgs) 1))
|
||||
(setq-local pkg-module (s-replace " " "::" (s-titleized-words (if pkgs-p (car pkgs) (s-join " " (butlast pkgs))))))
|
||||
(setq-local pkg-module (s-replace " " "::" (s-titleized-words (if pkgs-p (car pkgs) (string-join (butlast pkgs) " ")))))
|
||||
|
||||
(concat "lib/" (file-name-nondirectory buffer-file-name)))`
|
||||
|
||||
|
|
|
@ -133,7 +133,7 @@ but do not execute them."
|
|||
flags))))
|
||||
(if lines
|
||||
(mapcar (lambda (it)
|
||||
(let ((pane (s-split it ";")))
|
||||
(let ((pane (split-string it ";")))
|
||||
(list (nth 0 pane)
|
||||
:window-id (nth 1 pane)
|
||||
:session-id (nth 2 pane)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue