Emacs: Use cyberpunk theme.

Move my own theme to theme-ambrevar.el.

.emacs.d/init.el

@@ -333,6 +333,13 @@
   (setq transmission-refresh-modes '(transmission-mode transmission-files-mode transmission-info-mode transmission-peers-mode)
         transmission-refresh-interval 1))
 
+;;; Theme
+(if (ignore-errors (load-theme 'cyberpunk 'no-confirm))
+    ;; REVIEW: Backport unmerged change https://github.com/n3mo/cyberpunk-theme.el/pull/41.
+    (let ((cyberpunk-bg-1 "#2b2b2b"))
+      (set-face-background 'magit-section-highlight cyberpunk-bg-1))
+  (require 'theme-ambrevar))
+
 ;;; Translator
 (when (require 'google-translate nil t)
   (require 'google-translate-default-ui)

.emacs.d/lisp/main.el

@@ -372,4 +372,17 @@
       'noerror)                         ; TODO: Remove with Emacs 27?
 (add-to-list 'auth-sources 'password-store 'append)
 
+;; Visual
+;;; Font size
+(when (fboundp 'tool-bar-mode)
+  ;; (set-face-attribute 'default nil :height 100)
+  (when (find-font (font-spec :name "DejaVu Sans Mono-12"))
+    ;; Emacs raises an error if font is not found.
+    (add-to-list 'default-frame-alist '(font . "DejaVu Sans Mono-12"))))
+;;; Cursor type: default (box) is visible and practical.
+;; (setq-default cursor-type 'hollow)
+(setq-default x-stretch-cursor t)
+;;; Blinking cursor is on only when Emacs is not daemonized.
+(blink-cursor-mode 0)
+
 (provide 'main)

.emacs.d/lisp/theme-ambrevar.el

@@ -11,13 +11,6 @@
 (set-face-attribute 'default nil :foreground "white smoke" :background "#101010")
 (set-face-background 'mouse "#777777")
 
-;;; Font size
-(when (fboundp 'tool-bar-mode)
-  ;; (set-face-attribute 'default nil :height 100)
-  (when (find-font (font-spec :name "DejaVu Sans Mono-12"))
-    ;; Emacs raises an error if font is not found.
-    (add-to-list 'default-frame-alist '(font . "DejaVu Sans Mono-12"))))
-
 ;;; More readable but more space consuming; try on big screens.
 ;; (setq-default line-spacing 1)
 
@@ -32,12 +25,6 @@
 ;; (set-face-attribute 'highlight nil :background 'unspecified :box "white")
 ;; (set-face-attribute 'error nil :foreground "red" :weight 'bold)
 
-;;; Cursor type: default (box) is visible and practical.
-;; (setq-default cursor-type 'hollow)
-(setq-default x-stretch-cursor t)
-;;; Blinking cursor is on only when Emacs is not daemonized.
-(blink-cursor-mode 0)
-
 ;;; Line numbers.
 ;;; Graphic version has a gray bar separating text from line
 ;;; numbers, so we can leave the background black.
@@ -88,4 +75,4 @@
 (with-eval-after-load 'woman
   (set-face-foreground 'woman-bold (face-foreground 'font-lock-comment-face)))
 
-(provide 'visual)
+(provide 'theme-ambrevar)

.package-lists/guix-emacs-manifest.scm

@@ -9,6 +9,7 @@
     "emacs-circe"
     "emacs-cmake-mode"
     "emacs-company"
+    "emacs-cyberpunk-theme"
     ;; "emacs-dedicated" ; Doesn't work so well, or did I misunderstand?
     "emacs-daemons"
     "emacs-debbugs"