agenda and pdf stuff

README.org

@@ -711,6 +711,13 @@ Since I like to make my window manager handle a lot of the window management, I
 
 ** Languages
 
+*** Lua
+Since I use the Awesome WM I thought it'd be good to have lua around. It's also in a lot of things.
+#+begin_src emacs-lisp
+(use-package lua-mode
+  :mode ("\\.lua\\'" . lua-mode))
+#+end_src
+
 *** Fennel
 I use fennel to build my awesomewm config. So, we'll need that downloaded.
 #+begin_src emacs-lisp
@@ -1058,7 +1065,8 @@ Part of this config includes some special capture templates for my work as a you
            "r" 'org-agenda-redo
            "d" 'org-agenda-deadline
            "s" 'org-agenda-schedule
-           "t" 'org-agenda-todo)
+           "t" 'org-agenda-todo
+           "c" 'org-agenda-capture)
   ('normal org-columns-map
            "j" 'outline-next-heading
            "h" 'outline-previous-heading
@@ -1711,7 +1719,9 @@ Let's use pdf-tools for a lot better interaction with pdfs.
                  :branch "fix-macros")
   :defer 1
   :config
-  (pdf-tools-install))
+  (pdf-tools-install)
+  (custom-set-variables '(pdf-misc-print-program "/usr/bin/lpr")
+                        '(pdf-misc-print-program-args (quote ("-o media=Letter" "-o fitplot")))))
 #+end_src
 
 ** EPUB
@@ -1804,20 +1814,31 @@ interfere with the default `bongo-playlist-buffer'."
 (use-package bongo
   :commands (bongo bongo-playlist-buffer)
   :config
-  (define-bongo-backend mpv
+  (define-bongo-backend mpv-slow
     :program-name 'mpv
     :constructor 'bongo-start-mpv-player
-    :extra-program-arguments '("--input-ipc-server=/tmp/mpvsocket")
+    :extra-program-arguments '("--profile=slow --input-ipc-server=/tmp/mpvsocket")
     :matcher '((local-file "file:" "http:" "ftp:" "lbry:")
-               "ogg" "flac" "mp3" "mka" "wav" "wma"
+               "ogg" "flac" "mp3" "mka" "wav"
-               "mpg" "mpeg" "vob" "avi" "ogm" "opus" "mp4"
+                "ogm" "opus" )
+    :matcher '(("mms:" "mmst:" "rtp:" "rtsp:" "udp:" "unsv:"
+                "dvd:" "vcd:" "tv:" "dvb:" "mf:" "cdda:" "cddb:"
+                "cue:" "sdp:" "mpst:" "tivo:") . t)
+    :matcher '(("http:" "https:" "lbry:") . t))
+
+  (define-bongo-backend mpv-fast
+    :constructor 'bongo-start-mpv-player
+    :extra-program-arguments '("--profile=fast --input-ipc-server=/tmp/mpvsocket")
+    :matcher '((local-file "file:" "http:" "ftp:" "lbry:")
+               "mka" "wav" "wma"
+               "mpg" "mpeg" "vob" "avi" "ogm" "mp4"
                "mkv" "mov" "asf" "wmv" "rm" "rmvb" "ts")
     :matcher '(("mms:" "mmst:" "rtp:" "rtsp:" "udp:" "unsv:"
                 "dvd:" "vcd:" "tv:" "dvb:" "mf:" "cdda:" "cddb:"
                 "cue:" "sdp:" "mpst:" "tivo:") . t)
     :matcher '(("http:" "https:" "lbry:") . t))
 
-  (setq bongo-enabled-backends '(mpv)
+  (setq bongo-enabled-backends '(mpv-fast mpv-slow)
         bongo-track-mark-icon-file-name "track-mark-icon.png")
 
   (defun chris/bongo-mark-line-forward ()
@@ -1840,9 +1861,18 @@ interfere with the default `bongo-playlist-buffer'."
     "d" 'bongo-kill-line
     "u" 'bongo-unmark-region
     "p" 'bongo-pause/resume
+    "P" 'bongo-yank
     "H" 'bongo-switch-buffers
     "q" 'bury-buffer
-    "m" 'chris/bongo-mark-line-forward))
+    "m" 'chris/bongo-mark-line-forward)
+  (general-def 'normal bongo-library-mode-map
+    "RET" 'bongo-dwim
+    "d" 'bongo-kill-line
+    "u" 'bongo-unmark-region
+    "e" 'bongo-insert-enqueue
+    "p" 'bongo-pause/resume
+    "H" 'bongo-switch-buffers
+    "q" 'bury-buffer))
 #+end_src
 
 ** Transmission

init.el

@@ -414,6 +414,9 @@ vertically."
   (setq format-all-formatters '("Emacs Lisp" emacs-lisp))
   :defer 1)
 
+(use-package lua-mode
+  :mode ("\\.lua\\'" . lua-mode))
+
 (use-package fennel-mode
   :mode ("\\.fnl\\'" . fennel-mode))
 
@@ -692,7 +695,8 @@ vertically."
            "r" 'org-agenda-redo
            "d" 'org-agenda-deadline
            "s" 'org-agenda-schedule
-           "t" 'org-agenda-todo)
+           "t" 'org-agenda-todo
+           "c" 'org-agenda-capture)
   ('normal org-columns-map
            "j" 'outline-next-heading
            "h" 'outline-previous-heading
@@ -1270,7 +1274,9 @@ If on a:
                  :branch "fix-macros")
   :defer 1
   :config
-  (pdf-tools-install))
+  (pdf-tools-install)
+  (custom-set-variables '(pdf-misc-print-program "/usr/bin/lpr")
+                        '(pdf-misc-print-program-args (quote ("-o media=Letter" "-o fitplot")))))
 
 (use-package nov
   :mode ("\\.epub\\'" . nov-mode)
@@ -1352,20 +1358,31 @@ interfere with the default `bongo-playlist-buffer'."
 (use-package bongo
   :commands (bongo bongo-playlist-buffer)
   :config
-  (define-bongo-backend mpv
+  (define-bongo-backend mpv-slow
     :program-name 'mpv
     :constructor 'bongo-start-mpv-player
-    :extra-program-arguments '("--input-ipc-server=/tmp/mpvsocket")
+    :extra-program-arguments '("--profile=slow --input-ipc-server=/tmp/mpvsocket")
     :matcher '((local-file "file:" "http:" "ftp:" "lbry:")
-               "ogg" "flac" "mp3" "mka" "wav" "wma"
+               "ogg" "flac" "mp3" "mka" "wav"
-               "mpg" "mpeg" "vob" "avi" "ogm" "opus" "mp4"
+                "ogm" "opus" )
+    :matcher '(("mms:" "mmst:" "rtp:" "rtsp:" "udp:" "unsv:"
+                "dvd:" "vcd:" "tv:" "dvb:" "mf:" "cdda:" "cddb:"
+                "cue:" "sdp:" "mpst:" "tivo:") . t)
+    :matcher '(("http:" "https:" "lbry:") . t))
+
+  (define-bongo-backend mpv-fast
+    :constructor 'bongo-start-mpv-player
+    :extra-program-arguments '("--profile=fast --input-ipc-server=/tmp/mpvsocket")
+    :matcher '((local-file "file:" "http:" "ftp:" "lbry:")
+               "mka" "wav" "wma"
+               "mpg" "mpeg" "vob" "avi" "ogm" "mp4"
                "mkv" "mov" "asf" "wmv" "rm" "rmvb" "ts")
     :matcher '(("mms:" "mmst:" "rtp:" "rtsp:" "udp:" "unsv:"
                 "dvd:" "vcd:" "tv:" "dvb:" "mf:" "cdda:" "cddb:"
                 "cue:" "sdp:" "mpst:" "tivo:") . t)
     :matcher '(("http:" "https:" "lbry:") . t))
 
-  (setq bongo-enabled-backends '(mpv)
+  (setq bongo-enabled-backends '(mpv-fast mpv-slow)
         bongo-track-mark-icon-file-name "track-mark-icon.png")
 
   (defun chris/bongo-mark-line-forward ()
@@ -1388,9 +1405,18 @@ interfere with the default `bongo-playlist-buffer'."
     "d" 'bongo-kill-line
     "u" 'bongo-unmark-region
     "p" 'bongo-pause/resume
+    "P" 'bongo-yank
     "H" 'bongo-switch-buffers
     "q" 'bury-buffer
-    "m" 'chris/bongo-mark-line-forward))
+    "m" 'chris/bongo-mark-line-forward)
+  (general-def 'normal bongo-library-mode-map
+    "RET" 'bongo-dwim
+    "d" 'bongo-kill-line
+    "u" 'bongo-unmark-region
+    "e" 'bongo-insert-enqueue
+    "p" 'bongo-pause/resume
+    "H" 'bongo-switch-buffers
+    "q" 'bury-buffer))
 
 (use-package transmission
   :commands (transmission)