Subword mode (i.e. camelcase)

This commit is contained in:
Peter Selby 2021-01-25 14:21:12 -06:00
parent 94f12b766f
commit 130fa9953a
1 changed files with 4 additions and 1 deletions

View File

@ -108,11 +108,13 @@
(ivy-prescient-mode 1) (ivy-prescient-mode 1)
(global-subword-mode 1)
(with-current-buffer (get-buffer "*scratch*") (with-current-buffer (get-buffer "*scratch*")
(emacs-lisp-mode)) (emacs-lisp-mode))
(defun filter (condp lst) (defun filter (condp lst)
"Filter list lst to only those elements matching condp." "Filter list LST to only those elements matching CONDP."
(delq nil (mapcar (lambda (x) (and (funcall condp x) x)) lst))) (delq nil (mapcar (lambda (x) (and (funcall condp x) x)) lst)))
(add-hook 'eshell-mode-hook (add-hook 'eshell-mode-hook
@ -121,6 +123,7 @@
(setenv "EDITOR" "emacsclient"))) (setenv "EDITOR" "emacsclient")))
(defun get-bash-path () (defun get-bash-path ()
"Return paths from the bash PATH."
(let* ((bash-path (bash-env-var "PATH")) (let* ((bash-path (bash-env-var "PATH"))
(path-dirs (split-string bash-path ":"))) (path-dirs (split-string bash-path ":")))
(filter #'file-directory-p path-dirs))) (filter #'file-directory-p path-dirs)))