~doom.d -> Doom/.doom.d

Proper naming, GNU/Stow style.

2 files changed, 50 insertions, 0 deletions

diff --git a/Doom/.doom.d/modules/private/gentemplate/README.org b/Doom/.doom.d/modules/private/gentemplate/README.org
new file mode 100644
index 0000000..c09f20e
--- /dev/null
+++ b/Doom/.doom.d/modules/private/gentemplate/README.org
@@ -0,0 +1,19 @@
+#+TITLE:   private/gentemplate
+#+DATE:    March 17, 2020
+
+* Description
+This module allows users to clone templates from my Github to specific machines.
+These templates allow for quick and easy setup for languages or frameworks where
+this sort of thing isn't very nice to do (for example C++).
+
+This module is used through the main function =+gentemplate/generate-template=.
+It will ask what template you want to use then where to put it, finally doing
+the necessary work to get you that template. You may mutate the variables
+=+gentemplate/template-list= and =+gentemplate/profile-url= to customise your
+templates.
+* Prerequisites
+- git
+* Requirements
+- ivy
+- magit
+- cl
diff --git a/Doom/.doom.d/modules/private/gentemplate/config.el b/Doom/.doom.d/modules/private/gentemplate/config.el
new file mode 100644
index 0000000..5f00084
--- /dev/null
+++ b/Doom/.doom.d/modules/private/gentemplate/config.el
@@ -0,0 +1,31 @@
+;;; private/gentemplate/config.el -*- lexical-binding: t; -*-
+
+(require 'cl)
+
+(setq +gentemplate/template-list (list "CTemplate" "CPPTemplate" "PythonTemplate" "NodeTemplate" "ArduinoTemplate" "JavaTemplate"))
+(setq +gentemplate/profile-url "https://github.com/oreodave/")
+
+(defun +gentemplate/offline ()
+  (eq (list-length (network-interface-list)) 1))
+
+(defun +gentemplate/copy-template (template-name dest)
+  "Copy a template project via it's `template-name' to a folder called `dest'"
+  (copy-directory (expand-file-name (concat "~/Code/Templates/" template-name)) dest))
+
+(after! (ivy magit-clone)
+  (defun +gentemplate/download-template (template-name dest)
+    "Download a given template via its `template-name' to the `dest' folder"
+    (magit-clone-regular (concat +gentemplate/profile-url template-name) dest nil))
+
+  (defun +gentemplate/generate-template ()
+    (interactive)
+    (ivy-read
+     "Enter template: "
+     +gentemplate/template-list
+     :action
+     (lambda (template-name)
+       (let ((dir (read-directory-name "Enter directory to download to: "))
+             (offline (+gentemplate/offline)))
+         (if offline
+             (+gentemplate/copy-template template-name dir)
+           (+gentemplate/download-template template-name dir)))))))