21 lines
1.3 KiB
Plaintext
21 lines
1.3 KiB
Plaintext
|
;; Config file for Hyprchan -*- mode: emacs-lisp -*-
|
||
|
|
|
||
|
|
(defvar waifudir "~/.local/share/waifus/"
|
||
|
|
"Directory to search for waifus.
|
||
|
|
|
||
|
|
All images should be transparent PNGs, preferably large. Small images will be ugly when scaled up.")
|
||
|
|
(defvar wallpapers "~/.local/share/backgrounds/"
|
||
|
|
"Directory to search for wallpapers. Images may be JPG or PNG.")
|
||
|
|
(defvar cachedir "~/.cache/hyprchan/"
|
||
|
|
"Directory to cache intermediate files - waifus and logos and such.")
|
||
|
|
(defvar logosrc "/usr/share/hyprland/hyprland.png"
|
||
|
|
"Transparent PNG logo of the window manager/system.")
|
||
|
|
(defvar splash (string-trim (shell-command-to-string "hyprctl splash"))
|
||
|
|
"Splash message, displayed at bottom center on final background.")
|
||
|
|
|
||
|
|
|
||
|
|
;;; Hyprchan depends on two elisp libraries, `f' and `dash'.
|
||
|
|
;;; If these are not installed system-wide, uncomment below to install them with straight.el
|
||
|
|
|
||
|
|
(defvar bootstrap-version) (let ((bootstrap-file (expand-file-name "straight/repos/straight.el/bootstrap.el" user-emacs-directory)) (bootstrap-version 6)) (unless (file-exists-p bootstrap-file) (with-current-buffer (url-retrieve-synchronously "https://raw.githubusercontent.com/radian-software/straight.el/develop/install.el" 'silent 'inhibit-cookies) (goto-char (point-max)) (eval-print-last-sexp))) (load bootstrap-file nil 'nomessage)) (straight-use-package 'f) (straight-use-package 'dash)
|