[Emacs-diffs] Changes to emacs/lisp/erc/erc-compat.el,v

[Miles Bader]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Miles Bader <miles>     07/04/01 13:36:38

Index: lisp/erc/erc-compat.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/erc/erc-compat.el,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -b -r1.3 -r1.4
--- lisp/erc/erc-compat.el      21 Jan 2007 02:47:36 -0000      1.3
+++ lisp/erc/erc-compat.el      1 Apr 2007 13:36:37 -0000       1.4
@@ -161,14 +161,6 @@
        (setq newseq (cons el newseq))))
     (nreverse newseq)))
 
-;; Provide a simpler replacement for `gensym'.
-(defvar *erc-sym-counter* 0)
-(defun erc-gensym ()
-  "Generate a new uninterned symbol."
-  (let ((num (prog1 *erc-sym-counter*
-              (setq *erc-sym-counter* (1+ *erc-sym-counter*)))))
-    (make-symbol (format "*erc-sym-%d*" num))))
-
 ;; Copied from cl-extra.el
 (defun erc-subseq (seq start &optional end)
   "Return the subsequence of SEQ from START to END.