exot/.emacs.d
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Compare commits

base: exot:535bdda429dd4340ca9e06ab5ec9949eeca0e545
Branches Tags
exot:master
...
compare: exot:88bc5b3162581c28c787c7f2c64c8874e3a1db53
Branches Tags
exot:master

3 Commits
535bdda429 ... 88bc5b3162

Author SHA1 Message Date
Daniel Borchmann
88bc5b3162
Remove unnecessary require statements for helm-emms 
The removed packages are loaded by `helm-emms` directly.
 2023-10-27 16:32:30 +02:00
Daniel Borchmann
dae26fcc5a
Do not perform adaptive sorting in personal shortcut helper 
This never worked anyway, I would probably have had to define the source
globally for adaptive sorting to work, or something like that.  However, I am
usually happying with the interactive narrowing of the candidates, so let's get
rid of adaptive sorting for now.
 2023-10-27 16:31:02 +02:00
Daniel Borchmann
b3d620d884
Get rid of some more byte-compiler warnings in main init file 2023-10-27 16:30:19 +02:00
1 changed files with 82 additions and 83 deletions
Show Stats Expand all files Collapse all files

21
init.el
View File

@ -2012,7 +2012,6 @@ point to the beginning of buffer first."
:init (setq helm-command-prefix-key "C-c h" :init (setq helm-command-prefix-key "C-c h"
helm-input-idle-delay 0.0 helm-input-idle-delay 0.0
helm-buffers-fuzzy-matching t helm-buffers-fuzzy-matching t
helm-mode-fuzzy-match t
helm-autoresize-min-height 20 helm-autoresize-min-height 20
helm-ff-auto-update-initial-value t helm-ff-auto-update-initial-value t
helm-ff-file-name-history-use-recentf t helm-ff-file-name-history-use-recentf t
@ -2030,9 +2029,11 @@ point to the beginning of buffer first."
helm-kill-ring-threshold 0 ; include all yanks in the kill ring helm-kill-ring-threshold 0 ; include all yanks in the kill ring
) )
:config (progn :config (progn
(eval-when-compile
(require 'helm-mode) (require 'helm-mode)
(require 'helm-buffers) (require 'helm-buffers)
(require 'helm-ring) (require 'helm-ring)
(require 'helm-source))
(if (require 'helm-global-bindings nil :no-error) (if (require 'helm-global-bindings nil :no-error)
(progn (progn
@ -2102,7 +2103,7 @@ point to the beginning of buffer first."
(use-package company (use-package company
:commands (company-mode global-company-mode) :commands (company-mode global-company-mode)
:init (setq company-show-numbers t)) :init (setq company-show-quick-access t))
;; * Navigation ;; * Navigation
@ -2116,16 +2117,14 @@ is too slow (in this case, `db/important-document-path' should
eventuelly be set to nil, however)." eventuelly be set to nil, however)."
(interactive "P") (interactive "P")
(eval-when-compile (eval-when-compile
(require 'helm-bookmark) (require 'helm-bookmark))
(require 'helm-for-files)) ; for helm-source-recentf
(helm :sources (list (helm :sources (list
(helm-make-source "Frequently Used" 'helm-source-sync (helm-make-source "Frequently Used" 'helm-source-sync
:candidates (mapcar #'(lambda (entry) :candidates (mapcar #'(lambda (entry)
(cons (car entry) (cons (car entry)
(caddr entry))) (caddr entry)))
db/frequently-used-features) db/frequently-used-features)
:action '(("Open" . call-interactively)) :action '(("Open" . call-interactively)))
:filtered-candidate-transformer #'helm-adaptive-sort)
;; Taken from `helm-buffers-list' ;; Taken from `helm-buffers-list'
(helm-make-source "Buffers" 'helm-source-buffers) (helm-make-source "Buffers" 'helm-source-buffers)
@ -2337,10 +2336,7 @@ eventuelly be set to nil, however)."
:init (setq helm-emms-use-track-description-function t :init (setq helm-emms-use-track-description-function t
helm-emms-default-sources '(helm-source-emms-streams helm-emms-default-sources '(helm-source-emms-streams
helm-source-emms-dired helm-source-emms-dired
helm-source-emms-files)) helm-source-emms-files)))
:config (progn
(require 'emms)
(require 'helm-adaptive)))
(use-package image (use-package image
:init (setq image-use-external-converter t)) :init (setq image-use-external-converter t))
@ -2452,10 +2448,13 @@ eventuelly be set to nil, however)."
eshell-highlight-prompt nil eshell-highlight-prompt nil
eshell-cd-on-directory t eshell-cd-on-directory t
eshell-expand-input-functions '(eshell-expand-history-references)) eshell-expand-input-functions '(eshell-expand-history-references))
:config (progn (require 'em-prompt) :config (progn
(eval-when-compile
(require 'em-prompt)
(require 'em-term) (require 'em-term)
(require 'em-cmpl) (require 'em-cmpl)
(require 'em-hist) (require 'em-hist)
(require 'em-glob))
(setenv "PAGER" "cat") (setenv "PAGER" "cat")