[R-gregmisc-users] SF.net SVN: r-gregmisc:[1654] trunk/SASxport/R

[<wa...@us...>]

Revision: 1654
          http://sourceforge.net/p/r-gregmisc/code/1654
Author:   warnes
Date:     2013-05-11 20:11:36 +0000 (Sat, 11 May 2013)
Log Message:
-----------
Fix spelling error.

Modified Paths:
--------------
    trunk/SASxport/R/write.xport.R
    trunk/SASxport/R/zzz.R

Modified: trunk/SASxport/R/write.xport.R
===================================================================
--- trunk/SASxport/R/write.xport.R	2013-05-11 20:10:12 UTC (rev 1653)
+++ trunk/SASxport/R/write.xport.R	2013-05-11 20:11:36 UTC (rev 1654)
@@ -123,8 +123,8 @@
     if(file==stdout())
       out <- function(...)
         {
-          cat("ASCII: ", rawToDisplay(...), "")
-          cat("HEX:   ", ..., "")
+          cat("ASCII: ", rawToDisplay(...), "\n")
+          cat("HEX:   ", ..., "\n")
         }
     else
       out <- function(...) writeBin( ..., raw(), con=file)
@@ -159,7 +159,7 @@
         out( xport.member.header(dfName=i, cDate=cDate, sasVer=sasVer, osType=osType ) )
         scat("Done.")
 
-        scat("Write variable informaton block header ...")
+        scat("Write variable information block header ...")
         out( xport.namestr.header( nvar=ncol(df) ) )
         scat("Done.")
         

Modified: trunk/SASxport/R/zzz.R
===================================================================
--- trunk/SASxport/R/zzz.R	2013-05-11 20:10:12 UTC (rev 1653)
+++ trunk/SASxport/R/zzz.R	2013-05-11 20:11:36 UTC (rev 1654)
@@ -9,7 +9,6 @@
   cat("\n")
 }
 
-
 .onLoad <- function(lib, pkg) {
   loadMessage()
 }

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.