Browse Source

Made convenience function paths better, reformatted

master
Macoy Madson 4 years ago
parent
commit
17ed783497
  1. 25
      ReadMe.org

25
ReadMe.org

@ -32,18 +32,19 @@ will output help with argument descriptions.
*** Emacs convenience function
Here's an Emacs Lisp setup for making it easier to create new themes. You'll need to customize it with your own paths.
#+BEGIN_SRC lisp
(setq macoy-auto-theme-schemer2-bin "c:/Users/mmadson/go/bin/schemer2.exe")
(setq macoy-auto-theme-script-dir "c:/Users/mmadson/MacoyPrograms/auto-base16-theme")
(setq macoy-auto-theme-output-file "c:/Users/mmadson/AppData/Roaming/.emacs.d/elpa/base16-theme-20190413.1637/base16-my-auto-theme.el")
(defun macoy-generate-auto-theme ()
"Create a base16 auto-theme using AutoBase16Theme.py based on the image selected."
(interactive)
(let ((default-directory macoy-auto-theme-script-dir))
(compile
(format "%s -format img::colors -in \"%s\" -out colors.txt && C:/Cryptic/tools/Python_34/python.exe AutoBase16Theme.py emacs-base16-theme-template.el %s"
macoy-auto-theme-schemer2-bin (read-file-name "Image: ") macoy-auto-theme-output-file))))
(setq macoy-auto-theme-schemer2-bin "~/go/bin/schemer2.exe")
(setq macoy-auto-theme-script-dir "~/auto-base16-theme")
(setq macoy-auto-theme-output-file
"~/AppData/Roaming/.emacs.d/elpa/base16-theme-20190413.1637/base16-my-auto-theme.el")
(defun macoy-generate-auto-theme ()
"Create a base16 auto-theme using AutoBase16Theme.py based on the image selected."
(interactive)
(let ((default-directory macoy-auto-theme-script-dir))
(compile
(format "%s -format img::colors -in \"%s\" -out colors.txt && C:/Python_34/python.exe AutoBase16Theme.py emacs-base16-theme-template.el %s"
macoy-auto-theme-schemer2-bin (read-file-name "Image: ") macoy-auto-theme-output-file))))
#+END_SRC
** Example results
[[./images/Example1.jpg]]

Loading…
Cancel
Save