From sboukarev at common-lisp.net  Sat Mar  2 01:17:09 2013
From: sboukarev at common-lisp.net (CVS User sboukarev)
Date: Fri, 01 Mar 2013 17:17:09 -0800
Subject: [slime-cvs] CVS slime
Message-ID: <E1UBb4X-0005jq-Kv@common-lisp.net>

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

Modified Files:
	ChangeLog slime-autoloads.el 
Log Message:
* slime-autoloads.el: Don't load autoloads when slime is already
loaded, there's no sense in doing so.


--- /project/slime/cvsroot/slime/ChangeLog	2013/02/20 17:33:14	1.2394
+++ /project/slime/cvsroot/slime/ChangeLog	2013/03/02 01:17:09	1.2395
@@ -1,3 +1,8 @@
+2013-03-02  Stas Boukarev  <stassats at gmail.com>
+
+	* slime-autoloads.el: Don't load autoloads when slime is already
+	loaded, there's no sense in doing so.
+
 2013-02-20  Stas Boukarev  <stassats at gmail.com>
 
 	* slime.el (slime-attempt-connection): Don't run the timer with a
--- /project/slime/cvsroot/slime/slime-autoloads.el	2009/03/27 20:49:41	1.6
+++ /project/slime/cvsroot/slime/slime-autoloads.el	2013/03/02 01:17:09	1.7
@@ -12,33 +12,34 @@
 
 ;;; Code:
 
-(autoload 'slime "slime"
-  "Start a Lisp subprocess and connect to its Swank server." t) 
+(unless (featurep 'slime)
+  (autoload 'slime "slime"
+            "Start a Lisp subprocess and connect to its Swank server." t) 
 
-(autoload 'slime-mode "slime"
-  "SLIME: The Superior Lisp Interaction (Minor) Mode for Emacs." t)
+  (autoload 'slime-mode "slime"
+            "SLIME: The Superior Lisp Interaction (Minor) Mode for Emacs." t)
 
-(autoload 'slime-connect "slime"
-  "Connect to a running Swank server." t)
+  (autoload 'slime-connect "slime"
+            "Connect to a running Swank server." t)
 
-(autoload 'hyperspec-lookup "hyperspec" nil t)
+  (autoload 'hyperspec-lookup "hyperspec" nil t)
 
-(autoload 'slime-lisp-mode-hook "slime")
-(autoload 'slime-scheme-mode-hook "slime")
+  (autoload 'slime-lisp-mode-hook "slime")
+  (autoload 'slime-scheme-mode-hook "slime")
 
-(defvar slime-lisp-modes '(lisp-mode))
-(defvar slime-setup-contribs nil
-  "List of contribst to load.
+  (defvar slime-lisp-modes '(lisp-mode))
+  (defvar slime-setup-contribs nil
+    "List of contribst to load.
 Modified my slime-setup.")
 
-(defun slime-setup (&optional contribs)
-  "Setup Emacs so that lisp-mode buffers always use SLIME.
+  (defun slime-setup (&optional contribs)
+    "Setup Emacs so that lisp-mode buffers always use SLIME.
 CONTRIBS is a list of contrib packages to load."
-  (when (member 'lisp-mode slime-lisp-modes)
-    (add-hook 'lisp-mode-hook 'slime-lisp-mode-hook))
-  (setq slime-setup-contribs contribs)
-  (add-hook 'slime-load-hook 'slime-setup-contribs))
+    (when (member 'lisp-mode slime-lisp-modes)
+      (add-hook 'lisp-mode-hook 'slime-lisp-mode-hook))
+    (setq slime-setup-contribs contribs)
+    (add-hook 'slime-load-hook 'slime-setup-contribs))
 
-(provide 'slime-autoloads)
+  (provide 'slime-autoloads))
 
 ;;; slime-autoloads.el ends here




From mevenson at common-lisp.net  Fri Mar  8 11:12:25 2013
From: mevenson at common-lisp.net (CVS User mevenson)
Date: Fri, 08 Mar 2013 03:12:25 -0800
Subject: [slime-cvs] CVS slime
Message-ID: <E1UDvDt-0003nm-UY@common-lisp.net>

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

Modified Files:
	ChangeLog swank-abcl.lisp 
Log Message:
swank-abcl.lisp:  Allow SLIME inspector to perform class finalization.

--- /project/slime/cvsroot/slime/ChangeLog	2013/03/02 01:17:09	1.2395
+++ /project/slime/cvsroot/slime/ChangeLog	2013/03/08 11:12:25	1.2396
@@ -1,3 +1,8 @@
+2013-03-08  Mark Evenson  <evenson at tethys.local>
+
+	* swank-abcl.lisp: Allow SLIME inspector to perform class
+	finalization.
+
 2013-03-02  Stas Boukarev  <stassats at gmail.com>
 
 	* slime-autoloads.el: Don't load autoloads when slime is already
--- /project/slime/cvsroot/slime/swank-abcl.lisp	2012/08/18 16:34:06	1.93
+++ /project/slime/cvsroot/slime/swank-abcl.lisp	2013/03/08 11:12:25	1.94
@@ -91,6 +91,7 @@
    mop::class-direct-superclasses
    mop::eql-specializer
    mop::class-finalized-p 
+   mop:finalize-inheritance
    cl:class-name
    mop::class-precedence-list
    class-prototype ;;dummy




From heller at common-lisp.net  Tue Mar 12 17:49:47 2013
From: heller at common-lisp.net (CVS User heller)
Date: Tue, 12 Mar 2013 10:49:47 -0700
Subject: [slime-cvs] CVS slime
Message-ID: <E1UFTKd-0006dR-MK@common-lisp.net>

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

Modified Files:
	ChangeLog slime.el 
Log Message:
* slime.el (slime-read-interactive-args): Use read-shell-command
to enable completion.  Patch by Daimrod/Greg.

--- /project/slime/cvsroot/slime/ChangeLog	2013/03/08 11:12:25	1.2396
+++ /project/slime/cvsroot/slime/ChangeLog	2013/03/12 17:49:47	1.2397
@@ -1,3 +1,8 @@
+2013-03-12  Helmut Eller  <heller at common-lisp.net>
+
+	* slime.el (slime-read-interactive-args): Use read-shell-command
+	to enable completion.  Patch by Daimrod/Greg.
+
 2013-03-08  Mark Evenson  <evenson at tethys.local>
 
 	* swank-abcl.lisp: Allow SLIME inspector to perform class
--- /project/slime/cvsroot/slime/slime.el	2013/02/20 17:33:14	1.1428
+++ /project/slime/cvsroot/slime/slime.el	2013/03/12 17:49:47	1.1429
@@ -1090,7 +1090,7 @@
 
 (defvar slime-inferior-lisp-program-history '()
   "History list of command strings.  Used by `slime'.")
-                                                  
+
 (defun slime-read-interactive-args ()
   "Return the list of args which should be passed to `slime-start'.
 
@@ -1112,18 +1112,18 @@
   (let ((table slime-lisp-implementations))
     (cond ((not current-prefix-arg) (slime-lisp-options))
           ((eq current-prefix-arg '-)
-           (let ((key (completing-read 
-                       "Lisp name: " (mapcar (lambda (x) 
-                                               (list (symbol-name (car x)))) 
+           (let ((key (completing-read
+                       "Lisp name: " (mapcar (lambda (x)
+                                               (list (symbol-name (car x))))
                                              table)
                        nil t)))
              (slime-lookup-lisp-implementation table (intern key))))
           (t
            (destructuring-bind (program &rest program-args)
-               (split-string (read-string 
+               (split-string (read-shell-command
                               "Run lisp: " inferior-lisp-program
                               'slime-inferior-lisp-program-history))
-             (let ((coding-system 
+             (let ((coding-system
                     (if (eq 16 (prefix-numeric-value current-prefix-arg))
                         (read-coding-system "set slime-coding-system: "
                                             slime-net-coding-system)