From c65cf688fca3075f9d194e1ca8b954f9ddfd983c Mon Sep 17 00:00:00 2001 From: dx Date: Fri, 24 Apr 2020 02:53:57 +0100 Subject: ~doom.d -> Doom/.doom.d Proper naming, GNU/Stow style. --- .../.doom.d/modules/private/gentemplate/README.org | 19 +++++++++++++ Doom/.doom.d/modules/private/gentemplate/config.el | 31 ++++++++++++++++++++++ 2 files changed, 50 insertions(+) create mode 100644 Doom/.doom.d/modules/private/gentemplate/README.org create mode 100644 Doom/.doom.d/modules/private/gentemplate/config.el (limited to 'Doom/.doom.d/modules/private/gentemplate') 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))))))) -- cgit v1.2.3-13-gbd6f