DL
файлы все однотипные же, вся прелесть проджектайла была в том, что пишешь 3 буквы и переходишь, а тут будто каждый 2 файл назван индексом
C-' если ivy и прыгаешь куда надоSize: a a a
2021 January 08
DL
это раз, два - можно подтюнить
projectile-project-root-files-functions чтобы были два разных проекта, три - есть разные матчинг функцииO
записал, а что такое C-' для ivy ?
D
(defun fff ()
(let ((l (list)))
(mapatoms
(lambda (ob)
(when (boundp ob)
(let ((v (symbol-value ob)))
(when (and (stringp v)
(< (length v) 30)
(s-contains? ".config/emacs" v))
(add-to-list 'l (cons ob v)))))))
l))
(insert "\n" (s-replace-all '((") (" . ")\n(")
("config" . "local"))
(prin1-to-string (fff))))
D
После эвала последнего секспа получается такая штука
((package-user-dir . "~/.local/emacs/elpa")
(aa . ".local/emacs")
(eshell-directory-name . "~/.local/emacs/eshell/")
(server-auth-dir . "~/.local/emacs/server/")
(startup--xdg-local-default . "~/.local/emacs/")
(tramp-persistency-file-name . "/home/lil/.local/emacs/tramp")
(url-localuration-directory . "~/.local/emacs/url/")
(abbrev-file-name . "~/.local/emacs/abbrev_defs")
(startup--xdg-local-home-emacs . "~/.local/emacs/")
(request-storage-directory . "~/.local/emacs/request")
(diary-file . "~/.local/emacs/diary")
(user-emacs-directory . "~/.local/emacs/")
(custom-theme-directory . "~/.local/emacs/")
(racket--local-dir . "~/.local/emacs/racket-mode/")
(eww-bookmarks-directory . "~/.local/emacs/")
(save-completions-file-name . "~/.local/emacs/completions")
(ido-save-directory-list-file . "~/.local/emacs/ido.last"))
D
Ну и после просто клавиатурного макроса можно узнать в какие юх пекичи это раскидать
((package-user-dir . "~/.local/emacs/elpa") ;package
(eshell-directory-name . "~/.local/emacs/eshell/") ;esh-mode
(server-auth-dir . "~/.local/emacs/server/") ;server
(startup--xdg-local-default . "~/.local/emacs/") ;org-table
(tramp-persistency-file-name . "/home/lil/.local/emacs/tramp") ;tramp-cache
(url-localuration-directory . "~/.local/emacs/url/") ;org-table
(abbrev-file-name . "~/.local/emacs/abbrev_defs") ;/gnu/store/slw6h3w4dvzvvlrcxdplb6pn4bnm2hfy-emacs-next-28.0.50-0.2ea3466/share/emacs/28.0.50/lisp/abbrev
(startup--xdg-local-home-emacs . "~/.local/emacs/") ;org-table
(request-storage-directory . "~/.local/emacs/request") ;request
(diary-file . "~/.local/emacs/diary") ;calendar
(user-emacs-directory . "~/.local/emacs/") ;/gnu/store/slw6h3w4dvzvvlrcxdplb6pn4bnm2hfy-emacs-next-28.0.50-0.2ea3466/share/emacs/28.0.50/lisp/subr
(custom-theme-directory . "~/.local/emacs/") ;/gnu/store/slw6h3w4dvzvvlrcxdplb6pn4bnm2hfy-emacs-next-28.0.50-0.2ea3466/share/emacs/28.0.50/lisp/custom
(racket--local-dir . "~/.local/emacs/racket-mode/") ;org-table
(eww-bookmarks-directory . "~/.local/emacs/") ;eww
(save-completions-file-name . "~/.local/emacs/completions") ;completion
(ido-save-directory-list-file . "~/.local/emacs/ido.last")) ;ido
Aß
искать переменные которые отвечают за директории?
D
что бы не гадили мне
D
я хотел всё сделать без кейборд макросов, но сложно + устал
DL
записал, а что такое C-' для ivy ?
ivy-avy, правда он щас в отдельном пакете
DL
Ну и после просто клавиатурного макроса можно узнать в какие юх пекичи это раскидать
((package-user-dir . "~/.local/emacs/elpa") ;package
(eshell-directory-name . "~/.local/emacs/eshell/") ;esh-mode
(server-auth-dir . "~/.local/emacs/server/") ;server
(startup--xdg-local-default . "~/.local/emacs/") ;org-table
(tramp-persistency-file-name . "/home/lil/.local/emacs/tramp") ;tramp-cache
(url-localuration-directory . "~/.local/emacs/url/") ;org-table
(abbrev-file-name . "~/.local/emacs/abbrev_defs") ;/gnu/store/slw6h3w4dvzvvlrcxdplb6pn4bnm2hfy-emacs-next-28.0.50-0.2ea3466/share/emacs/28.0.50/lisp/abbrev
(startup--xdg-local-home-emacs . "~/.local/emacs/") ;org-table
(request-storage-directory . "~/.local/emacs/request") ;request
(diary-file . "~/.local/emacs/diary") ;calendar
(user-emacs-directory . "~/.local/emacs/") ;/gnu/store/slw6h3w4dvzvvlrcxdplb6pn4bnm2hfy-emacs-next-28.0.50-0.2ea3466/share/emacs/28.0.50/lisp/subr
(custom-theme-directory . "~/.local/emacs/") ;/gnu/store/slw6h3w4dvzvvlrcxdplb6pn4bnm2hfy-emacs-next-28.0.50-0.2ea3466/share/emacs/28.0.50/lisp/custom
(racket--local-dir . "~/.local/emacs/racket-mode/") ;org-table
(eww-bookmarks-directory . "~/.local/emacs/") ;eww
(save-completions-file-name . "~/.local/emacs/completions") ;completion
(ido-save-directory-list-file . "~/.local/emacs/ido.last")) ;ido
я тебе больше скажу, в какие use-package раскидать можно даже без клавиатурных макросов
(file-name-sans-extension
(file-name-nondirectory
(find-lisp-object-file-name 'custom-theme-directory 'defvar)))
D
D
спасибо
DL
я всё хотел запилить чтобы автоматом генерить, но руки не доходят оформить нормально
D
Вариант для ценителей красоты и кофмрота
(insert "\n"
(s-replace-all '((") (" . ")\n(setq ")
("((" . "(setq ")
("))" . ")")
("config" . "local"))
(prin1-to-string (fff))))
(setq package-user-dir . "~/.local/emacs/elpa")
(setq eshell-directory-name . "~/.local/emacs/eshell/")
(setq server-auth-dir . "~/.local/emacs/server/")
(setq startup--xdg-local-default . "~/.local/emacs/")
(setq tramp-persistency-file-name . "/home/lil/.local/emacs/tramp")
(setq url-localuration-directory . "~/.local/emacs/url/")
(setq abbrev-file-name . "~/.local/emacs/abbrev_defs")
(setq startup--xdg-local-home-emacs . "~/.local/emacs/")
(setq request-storage-directory . "~/.local/emacs/request")
(setq diary-file . "~/.local/emacs/diary")
(setq user-emacs-directory . "~/.local/emacs/")
(setq custom-theme-directory . "~/.local/emacs/")
(setq racket--local-dir . "~/.local/emacs/racket-mode/")
(setq eww-bookmarks-directory . "~/.local/emacs/")
(setq save-completions-file-name . "~/.local/emacs/completions")
(setq ido-save-directory-list-file . "~/.local/emacs/ido.last")
DL
стопэ, ты переписываешь customize-овскую сейвилку?
D
нет, просто сделал вариант для тех кто не любит юз пекич
DL
нет, просто сделал вариант для тех кто не любит юз пекич
setq поддерживает множественное присваивание, раз пошла такая пьянка