[Stacomir-commits] r524 - pkg/stacomir/R

[noreply at r-forge.r-project.org]

Author: briand
Date: 2018-09-28 21:38:53 +0200 (Fri, 28 Sep 2018)
New Revision: 524

Modified:
   pkg/stacomir/R/stacomi.R
Log:
Fixing unwanted connection problem

Modified: pkg/stacomir/R/stacomi.R
===================================================================
--- pkg/stacomir/R/stacomi.R	2018-09-28 09:59:25 UTC (rev 523)
+++ pkg/stacomir/R/stacomi.R	2018-09-28 19:38:53 UTC (rev 524)
@@ -377,7 +377,7 @@
   # the following values may be overridden later in load_stacomi()
   assign("baseODBC",baseODBC,envir=envir_stacomi)
   assign("sch",paste(baseODBC[2],".",sep=""),envir=envir_stacomi)
-  dbname<-getdbname()	
+  if (database_expected) dbname<-getdbname()	
   #libraries()
   # change 2018 the test database is no longer used, we use usernames and
   # password from the local baseODBC string