diff options
author | Kyle Meyer <meyerkya@gmail.com> | 2013-04-20 02:22:06 -0400 |
---|---|---|
committer | Kyle Meyer <meyerkya@gmail.com> | 2013-04-20 02:22:06 -0400 |
commit | 58ed43ac257c8f1585a034f1e04fd1ca35884695 (patch) | |
tree | 0cd6d22b81ae1e99f6bc6b41b1b09efcc0b967a3 /init/km-func.el | |
parent | 18755b3721cdeedad7beb20610d758004b2ce533 (diff) | |
download | emacs.d-58ed43ac257c8f1585a034f1e04fd1ca35884695.tar.gz |
cleaning up
Diffstat (limited to 'init/km-func.el')
-rw-r--r-- | init/km-func.el | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/init/km-func.el b/init/km-func.el index 62ee561..f59d4ec 100644 --- a/init/km-func.el +++ b/init/km-func.el @@ -35,19 +35,6 @@ (insert "#!/usr/bin/env " lang "\n")) (global-set-key (kbd "C-c s") 'km/shebang) -(defun km/insert-random-string (&optional strlen) - "Insert a random string (default length: 5)" - (interactive) - (unless strlen - (setq strlen 5)) - (let (mycharset (ii 0) ) - (setq mycharset ["a" "b" "c" "d" "e" "f" "g" "h" "i" - "j" "k" "l" "m" "n" "o" "p" "q" "r" - "s" "t" "u" "v" "w" "x" "y" "z"]) - (while (< ii strlen) - (insert (elt mycharset (random (length mycharset)))) - (setq ii (1+ ii))))) - (defun km/insert-date () (interactive) (insert (format-time-string "%Y-%m-%d"))) |