Revision: 1189
http://r-gregmisc.svn.sourceforge.net/r-gregmisc/?rev=1189&view=rev
Author: warnes
Date: 2007-09-25 12:53:42 -0700 (Tue, 25 Sep 2007)
Log Message:
-----------
Display version and support information on package load
Modified Paths:
--------------
trunk/SASxport/R/zzz.R
Modified: trunk/SASxport/R/zzz.R
===================================================================
--- trunk/SASxport/R/zzz.R 2007-09-18 17:42:27 UTC (rev 1188)
+++ trunk/SASxport/R/zzz.R 2007-09-25 19:53:42 UTC (rev 1189)
@@ -1,4 +1,22 @@
+loadMessage <- function()
+{
+ cat("\n")
+ ver <-packageDescription("SASxport", fields="Version")
+ date <- packageDescription("SASxport", fields="Date")
+ cat("Loaded SASxport version ", ver, " (", date ,").\n", sep="")
+ cat("\n")
+ cat(" Updates and technical support available from Random Technologies, LLC\n")
+ cat(" <http://random-technologies-llc.com/contact>\n")
+ cat("\n")
+}
+
+
+
.First.lib <- function(lib, pkg) {
library.dynam("SASxport", pkg, lib)
+ loadMessage()
}
+.onLoad <- function(lib, pkg) {
+ loadMessage()
+}
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
