;; 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)