[slime-cvs] CVS update: slime/ChangeLog slime/slime.el

[Christophe Rhodes]

Update of /project/slime/cvsroot/slime
In directory common-lisp.net:/tmp/cvs-serv18199

Modified Files:
	ChangeLog slime.el 
Log Message:
>From Alexey Dejneka: fix "pgk" typo.

Date: Sun Jun 12 23:05:29 2005
Author: crhodes

Index: slime/ChangeLog
diff -u slime/ChangeLog:1.712 slime/ChangeLog:1.713
--- slime/ChangeLog:1.712	Sun Jun 12 18:33:49 2005
+++ slime/ChangeLog	Sun Jun 12 23:05:29 2005
@@ -1,3 +1,7 @@
+2005-06-12  Alexey Dejneka  <adejneka at comail.ru>
+
+	* slime.el (slime-with-xref-buffer): fix "pgk" typo.
+
 2005-06-12  Christophe Rhodes  <csr21 at cam.ac.uk>
 
 	* swank.lisp (ed-in-emacs): allow strings as well as pathnames;


Index: slime/slime.el
diff -u slime/slime.el:1.508 slime/slime.el:1.509
--- slime/slime.el:1.508	Sun Jun 12 18:33:49 2005
+++ slime/slime.el	Sun Jun 12 23:05:29 2005
@@ -6307,11 +6307,11 @@
 (defmacro* slime-with-xref-buffer ((package ref-type symbol) &body body)
   "Execute BODY in a xref buffer, then show that buffer."
   (let ((type (gensym)) (sym (gensym)) (pkg (gensym)))
-    `(let ((,type ,ref-type) (,sym ,symbol) (,pgk ,package))
+    `(let ((,type ,ref-type) (,sym ,symbol) (,pkg ,package))
        (with-current-buffer (get-buffer-create 
                              (format "*XREF[%s: %s]*" ,type ,sym))
          (prog2 (progn
-                  (slime-init-xref-buffer ,pgk ,type ,sym)
+                  (slime-init-xref-buffer ,pkg ,type ,sym)
                   (make-local-variable 'slime-xref-saved-window-configuration)
                   (setq slime-xref-saved-window-configuration
                         (current-window-configuration)))