diff --git a/DESCRIPTION b/DESCRIPTION
index 3b8162a016e69306fe0669f370bbd85271bbe41e..55b93aa5dc1ae3131714f3f51b2c7805161dc909 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: shinyscreen
 Title: Pre-screening of Mass Spectrometry Data 
-Version: 1.0.8
+Version: 1.0.9
 Author: Todor Kondić
 Maintainer: Todor Kondić <todor.kondic@uni.lu>
 Authors@R: 
diff --git a/R/api.R b/R/api.R
index c16e2b7db02e4ed6a7769f09be19deb046798c81..44d43087b8b4554789b1209002e0c56df891f00b 100644
--- a/R/api.R
+++ b/R/api.R
@@ -787,6 +787,12 @@ app <- function(shiny_args=list(launch.browser=F),render_args=NULL,indir=getwd()
 serve <- function(indir,topuserdir,user,host='0.0.0.0',port=7777) {
     shiny_args <- c(list(launch.browser=F),list(host=host,port=port))
     userdir <- file.path(topuserdir,user)
+    if (!dir.exists(userdir)) {
+        dir.create(userdir)
+        message('Created userdir: ',userdir)
+    } else {
+        message('Using existing userdir: ', userdir)
+    }
     app(shiny_args=shiny_args,indir=indir,userdir=userdir)
 }