Made uuid interactive, will insert UUID into current buffer

kanru · Jul 26, 2011 · ddd9a4f · ddd9a4f
1 parent f2cfc7b
commit ddd9a4f
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/uuid.el b/uuid.el
@@ -257,8 +257,6 @@ the node information.  Pre-defined ADDR-FUNCTION are
         (seq (random)))
     (uuid--from-time clock seq 4 'uuid--format-random-address)))
 
-(defalias 'uuid 'uuid-1)
-
 (defun uuid-from-hash (hash ver)
   "Generate name based UUID form hash HASH and version VER."
   (mapconcat 'identity
@@ -293,5 +291,9 @@ NAME is the node name string."
   "Return the string representation of a UUID as a URN."
   (concat "urn:uuid:" uuid))
 
+(defun uuid ()
+  (interactive)
+  (insert (uuid-1)))
+
 (provide 'uuid)
 ;;; uuid.el ends here