513f2f06de
Why yes, this will look like it sprung, like Athena, fully grown and in armor from my head, but this is really just the mid-point of a new endeavor.
62 lines
1.9 KiB
Text
62 lines
1.9 KiB
Text
# -*- mode: snippet -*-
|
|
# name: __hamacs
|
|
# key: __hamacs
|
|
# --
|
|
#+TITLE: ${1:`(->> (buffer-file-name)
|
|
(file-name-base)
|
|
(s-split-words)
|
|
(--map (s-capitalize it))
|
|
(s-join " "))`}
|
|
#+AUTHOR: `user-full-name`
|
|
#+EMAIL: `user-mail-address`
|
|
#+DATE: `(format-time-string "%Y-%m-%d")`
|
|
#+FILETAGS: :emacs:
|
|
|
|
${2:A literate programming file configuring Emacs.}
|
|
|
|
#+BEGIN_SRC emacs-lisp :exports none
|
|
;;; `(file-name-base (buffer-file-name)))`.el --- $2 -*- lexical-binding: t; -*-
|
|
;;
|
|
;; Copyright (C) `(format-time-string "%Y")` `user-full-name`
|
|
;;
|
|
;; Author: `user-full-name` <http://gitlab.com/howardabrams>
|
|
;; Maintainer: `user-full-name` <`user-mail-address`>
|
|
;; Created: `(format-time-string "%B %e, %Y")`
|
|
;;
|
|
;; This file is not part of GNU Emacs.
|
|
;;
|
|
;; *NB:* Do not edit this file. Instead, edit the original literate file at:
|
|
;; `(buffer-file-name)`
|
|
;; And tangle the file to recreate this one.
|
|
;;
|
|
;;; Code:
|
|
#+END_SRC
|
|
|
|
* Introduction
|
|
|
|
$0
|
|
|
|
* Technical Artifacts :noexport:
|
|
|
|
Let's provide a name so that the file can be required:
|
|
|
|
#+BEGIN_SRC emacs-lisp :exports none
|
|
(provide '`(file-name-base (buffer-file-name)))`)
|
|
;;; `(file-name-base (buffer-file-name)))`.el ends here
|
|
#+END_SRC
|
|
|
|
Before you can build this on a new system, make sure that you put the cursor over any of these properties, and hit: ~C-c C-c~
|
|
|
|
#+DESCRIPTION: $2
|
|
|
|
#+PROPERTY: header-args:sh :tangle no
|
|
#+PROPERTY: header-args:emacs-lisp :tangle yes
|
|
#+PROPERTY: header-args :results none :eval no-export :comments no mkdirp yes
|
|
|
|
#+OPTIONS: num:nil toc:nil todo:nil tasks:nil tags:nil date:nil
|
|
#+OPTIONS: skip:nil author:nil email:nil creator:nil timestamp:nil
|
|
#+INFOJS_OPT: view:nil toc:nil ltoc:t mouse:underline buttons:0 path:http://orgmode.org/org-info.js
|
|
|
|
# Local Variables:
|
|
# eval: (add-hook 'after-save-hook #'org-babel-tangle t t)
|
|
# End: |