[slime-cvs] CVS slime/contrib

[CVS User sboukarev]

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

Modified Files:
	ChangeLog slime-repl.el 
Log Message:
Rename slime-repl-print-right-margin-follows-window to slime-repl-auto-right-margin.


--- /project/slime/cvsroot/slime/contrib/ChangeLog	2012/11/23 11:28:27	1.555
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2012/11/23 11:37:53	1.556
@@ -1,6 +1,6 @@
 2012-11-23  Stas Boukarev  <stassats at gmail.com>
 
-	* slime-repl.el (slime-repl-print-right-margin-follows-window):
+	* slime-repl.el (slime-repl-auto-right-margin):
 	New variable, defaults to NIL.
 	(slime-repl-eval-string): Respect the above variable.
 	* swank-repl.lisp (listener-eval): New keyword parameter,
--- /project/slime/cvsroot/slime/contrib/slime-repl.el	2012/11/23 11:28:27	1.64
+++ /project/slime/cvsroot/slime/contrib/slime-repl.el	2012/11/23 11:37:53	1.65
@@ -52,7 +52,7 @@
   :type '(boolean)
   :group 'slime-repl)
 
-(defcustom slime-repl-print-right-margin-follows-window nil
+(defcustom slime-repl-auto-right-margin nil
   "When T we bind CL:*PRINT-RIGHT-MARGIN* to the width of the
 current repl's (as per slime-output-buffer) window."
   :type '(boolean)
@@ -530,7 +530,7 @@
 
 (defun slime-repl-eval-string (string)
   (slime-rex ()
-      ((if slime-repl-print-right-margin-follows-window
+      ((if slime-repl-auto-right-margin
            `(swank:listener-eval ,string
                                  :window-width
                                  ,(with-current-buffer (slime-output-buffer)