emms and lang setup

2 files changed, 67 insertions, 0 deletions

diff --git a/bard-emacs-modules/bard-emacs-emms.el b/bard-emacs-modules/bard-emacs-emms.el
new file mode 100644
index 0000000..5fe47e8
--- /dev/null
+++ b/bard-emacs-modules/bard-emacs-emms.el
@@ -0,0 +1,16 @@
+;; |------------------------------------|
+;; |             EMMS                   |
+;; |------------------------------------|
+
+(require 'emms-setup)
+
+(emms-all)
+(setq emms-player-list '(emms-player-mpv)
+      emms-info-functions '(emms-info-native)
+      emms-playlist-buffer-name "*Music*")
+
+;; Keymaps
+(define-key global-map (kbd "<f8>") #'emms)
+(define-key global-map (kbd "M-<f8>") #'emms-browser)
+
+(provide 'bard-emacs-emms)
diff --git a/bard-emacs-modules/bard-emacs-lang.el b/bard-emacs-modules/bard-emacs-lang.el
new file mode 100644
index 0000000..b8c11f3
--- /dev/null
+++ b/bard-emacs-modules/bard-emacs-lang.el
@@ -0,0 +1,51 @@
+;;; bard-emacs-lang.el --- configuration for specific languages -*- lexical-binding: t -*-
+
+;; Author: Bardman
+;; Maintainer: Bardman
+;; Version: 0.1.0
+;; Package-Requires: ((Emacs "28.1"))
+
+;; This file is not part of GNU Emacs
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+
+;;; Commentary:
+
+;;; Code:
+
+(message "Hello World!")
+
+(provide 'bard-emacs-lang)
+
+;;; bard-emacs-lang.el ends here
+
+(defun bard/common-modes-hook ()
+  "Commonly used modes, bundled in one hook."
+  (display-line-numbers-mode 1)
+  (hl-todo-mode 1))
+
+(add-hook 'emacs-lisp-mode-hook 'bard/common-modes-hook)
+(add-hook 'haskell-mode-hook 'bard/common-modes-hook)
+(add-hook 'clojure-mode-hook 'bard/common-modes-hook)
+
+;; CPP Mode
+(defun bard/c++-mode-keybindings ()
+  (define-key 'c++-mode-map (kbd "C-c C-c") 'compile))
+
+(add-hook 'c++-mode-hook 'bard/c++-mode-keybindings)
+(add-hook 'c++-mode 'bard/common-modes-hook)
+
+(provide 'bard-emacs-lang.el)
+;;; bard-emacs-lang.el ends here