Skip to content

Instantly share code, notes, and snippets.

@bitops

bitops/tag-expansion.el

Created November 17, 2014 06:42
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save bitops/f06f593b48bdbe9e192a to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save bitops/f06f593b48bdbe9e192a to your computer and use it in GitHub Desktop.
Download ZIP
Raw
tag-expansion.el
(defun wrap-tag ()
(interactive)
(let ((name (symbol-at-point)))
(insert (concat "<" (symbol-name name) ">" "</" (symbol-name name) ">"))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment