Playing around with specifying the base

This is to make it easier to load data that is stored with the project.
This commit is contained in:
Howard Abrams 2022-02-05 21:35:45 -08:00
parent bdbc57448a
commit ee447ab549

View file

@ -23,11 +23,16 @@
(require 'hydra) (require 'hydra)
(require 's) (require 's)
(defconst rpgdm-base (file-name-directory load-file-name)) (require 'ert)
(load-file (expand-file-name "rpgdm-dice.el" rpgdm-base))
(load-file (expand-file-name "rpgdm-screen.el" rpgdm-base)) (require 'rpgdm-dice)
(load-file (expand-file-name "rpgdm-tables.el" rpgdm-base)) (require 'rpgdm-screen)
(load-file (expand-file-name "rpgdm-npc.el" rpgdm-base)) (require 'rpgdm-tables)
(defvar rpgdm-base
(seq-find (lambda (elt) (string-match "rpgdm" elt)) load-path (getenv "HOME"))
"Default directory to look for supporting data, like tables and charts.")
(define-minor-mode rpgdm-mode (define-minor-mode rpgdm-mode
"Minor mode for layering role-playing game master functions over your notes." "Minor mode for layering role-playing game master functions over your notes."