Changeset 26f22c5 in dotfiles

Timestamp:

Feb 10, 2020, 4:41:15 PM (5 years ago)

Author:

Mikhail Kirillov <w96k@…>

Branches:

master

Children:

e2de547

Parents:

1bb47a9

git-author:

Mikhail Kirillov <w96k@…> (02/10/20 16:41:03)

git-committer:

Mikhail Kirillov <w96k@…> (02/10/20 16:41:15)

Message:

Add emacs which-key

Files:

• emacs/.emacs (modified) (1 diff)
• emacs/.emacs-config.org (modified) (3 diffs)
• guix/config.scm (modified) (1 diff)

emacs/.emacs

@@ -43 +43 @@
 (org-babel-load-file "~/.emacs-config.org")
 (delete-file "~/.emacs-config.el")
-(custom-set-variables
- ;; custom-set-variables was added by Custom.
- ;; If you edit it by hand, you could mess it up, so be careful.
- ;; Your init file should contain only one such instance.
- ;; If there is more than one, they won't work right.
- '(package-selected-packages
-   (quote
-    (clj-refactor yasnippet-snippets vue-mode use-package swiper pos-tip org-mime org-journal mwim mood-line magit-gitflow keycast js2-mode intero git-gutter+ flymd flycheck-lilypond epresent company-anaconda column-enforce-mode color-theme-sanityinc-tomorrow cider browse-kill-ring auto-package-update aggressive-indent)))
- '(send-mail-function (quote smtpmail-send-it)))
-(custom-set-faces
- ;; custom-set-faces was added by Custom.
- ;; If you edit it by hand, you could mess it up, so be careful.
- ;; Your init file should contain only one such instance.
- ;; If there is more than one, they won't work right.
- )

emacs/.emacs-config.org

@@ -437 +437 @@
 #+BEGIN_SRC elisp
 (use-package parinfer
+  :after lispy
   :bind
   (("C-," . parinfer-toggle-mode))
@@ -660 +661 @@
   scroll-preserve-screen-position 100)
 #+END_SRC
+** Which-key
+#+BEGIN_SRC elisp
+  (use-package which-key
+    :config
+    (setq which-key-show-early-on-C-h t)
+    (setq which-key-side-window-location 'bottom)
+    (setq which-key-idle-delay 0.5)
+    (global-set-key (kbd "C-h C-k") 'which-key-show-major-mode)
+    (which-key-mode))
+#+END_SRC
 ** Системные пакеты
 *** Docker
@@ -668 +679 @@
   :bind ("C-c d" . docker))
 #+END_SRC
+** Мультимедиа
+*** EMMS
+#+BEGIN_SRC elisp
+  (use-package emms
+    :config
+   (emms-all)
+   (emms-default-players)
+   (setq emms-source-file-default-directory (expand-file-name "~/Music"))
+   (setq emms-player-list '(emms-player-mpg321 emms-player-ogg123
+                         emms-player-mplayer)))
+#+END_SRC
 ** Баг-трекеры
 *** Debbugs

guix/config.scm

@@ -135 +135 @@
          "emacs-slime-company"
          "emacs-parinfer-mode"
-         "emacs-lispy")))
+         "emacs-lispy"
+         "emacs-emms"
+         "emacs-which-key")))
 
 (operating-system