Skip to content

Instantly share code, notes, and snippets.

@nchapon

nchapon/my-nn

Created February 5, 2015 21:20
Show Gist options
  • Save nchapon/6d1d9e44bcf27afa6f17 to your computer and use it in GitHub Desktop.
Save nchapon/6d1d9e44bcf27afa6f17 to your computer and use it in GitHub Desktop.
Download ZIP
two lisp function
Raw
my-nn
;; This buffer is for notes you don't want to save, and for Lisp evaluation.
;; If you want to create a file, visit that file with C-x C-f,
;; then enter the text in that file's own buffer.
(defun my-nn ()
"DOCSTRING"
(interactive)
(let (w (select-word))
(forward-char)
(insert w)))
(defun select-word ()
"DOCSTRING"
(interactive)
(backward-char)
(thing-at-point 'word))
tetsee.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment