[Sciviews-commits] r393 - in pkg/svMisc: . R

noreply at r-forge.r-project.org noreply at r-forge.r-project.org
Sat Sep 3 15:58:31 CEST 2011


Author: phgrosjean
Date: 2011-09-03 15:58:30 +0200 (Sat, 03 Sep 2011)
New Revision: 393

Modified:
   pkg/svMisc/DESCRIPTION
   pkg/svMisc/NEWS
   pkg/svMisc/R/progress.R
Log:
Change in progress() to make it compatible with R 2.14.0

Modified: pkg/svMisc/DESCRIPTION
===================================================================
--- pkg/svMisc/DESCRIPTION	2011-09-03 13:47:28 UTC (rev 392)
+++ pkg/svMisc/DESCRIPTION	2011-09-03 13:58:30 UTC (rev 393)
@@ -5,8 +5,8 @@
 Depends: R (>= 2.11.0)
 Suggests: svUnit
 Description: Supporting functions for the GUI API (various utilitary functions)
-Version: 0.9-62
-Date: 2011-06-12
+Version: 0.9-63
+Date: 2011-09-03
 Author: Philippe Grosjean, Romain Francois & Kamil Barton
 Maintainer: Philippe Grosjean <phgrosjean at sciviews.org>
 License: GPL-2

Modified: pkg/svMisc/NEWS
===================================================================
--- pkg/svMisc/NEWS	2011-09-03 13:47:28 UTC (rev 392)
+++ pkg/svMisc/NEWS	2011-09-03 13:58:30 UTC (rev 393)
@@ -1,5 +1,11 @@
 = svMisc News
 
+== Changes in svMisc 0.9-63
+
+* progress() used \8, that was treated as octal for R < 2.14. Changed to \b in
+  order to correct this bug. Thanks Duncan Murdoch for pointing me on this.
+
+
 == Changes in svMisc 0.9-62
 
 * captureAll() now handles user interrupts and allows for traceback() afterwards

Modified: pkg/svMisc/R/progress.R
===================================================================
--- pkg/svMisc/R/progress.R	2011-09-03 13:47:28 UTC (rev 392)
+++ pkg/svMisc/R/progress.R	2011-09-03 13:58:30 UTC (rev 393)
@@ -70,7 +70,7 @@
 		l3 <- def(CmdProgress$msglength, 0, mode = "numeric", length = 1)
 		if (l3 < 0) l3 <- 0
 		CmdProgress$msglength <- NULL  # Avoid using twice same data
-		backspaces <- paste(rep("\8", l3), collapse = "")
+		backspaces <- paste(rep("\b", l3), collapse = "")
 		if (erase.only) {
 			message <- ""
 			cat(backspaces, rep(" ", l3), sep = "")



More information about the Sciviews-commits mailing list