From 4e13fd67073f6dbfe5ef1f975431a66d5ab533ac Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Roland=20Holl=C3=B3s?= <hollorol@gmail.com>
Date: Fri, 3 Jan 2020 12:50:38 +0100
Subject: [PATCH] Fixing the initial message bug

---
 RBBGCMuso/R/calibMuso.R | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/RBBGCMuso/R/calibMuso.R b/RBBGCMuso/R/calibMuso.R
index 2d47511..2612fbd 100644
--- a/RBBGCMuso/R/calibMuso.R
+++ b/RBBGCMuso/R/calibMuso.R
@@ -36,7 +36,9 @@ calibMuso <- function(settings=NULL, calibrationPar=NULL,
 ########################################################################
 ###########################Set local variables and places###############
 ########################################################################
-    cat("Biome-BGC simulation started\n") # ZOLI
+    if(!silent){
+        cat("Biome-BGC simulation started\n") # ZOLI
+    }
     if(is.null(settings)){
         settings <- setupMuso()
     }