diff --git a/R/mix.R b/R/mix.R
index 204289d1eac5d10a2d1fe8477acb5d6c163cffb0..aa6a4d01fd1bea4836acac995009cf3c1afa2147 100644
--- a/R/mix.R
+++ b/R/mix.R
@@ -1,3 +1,7 @@
+stripext<-function(fn) {
+    bits<-strsplit(fn,split="\\.")[[1]]
+    if (length(bits)> 1) paste(head(bits,-1),collapse=".") else fn}
+
 ##' Create directories without drama.
 ##'
 ##' 
@@ -162,16 +166,18 @@ mb.prep.v<-function(w,fn_info,fn_stgs) {
 ##' @author Todor Kondić
 mb.single<-function(mb,infodir,fn_stgs) {
     RMassBank::loadRmbSettings(fn_stgs)
+    
     mb <- RMassBank::resetInfolists(mb)
     mb <- RMassBank::loadInfolists(mb,infodir)
     ## loadInfolists
     ## addPeaks
-    RMassBank::mbWorkflow(mb,step=1:8)
+    prevd<-setwd(infodir)
+    res<-RMassBank::mbWorkflow(mb,step=1:8)
+    setwd(prevd)
+    res
 }
 
-stripext<-function(fn) {
-    bits<-strsplit(fn,split="\\.")[[1]]
-    if (length(bits)> 1) paste(head(bits,-1),collapse=".") else fn}
+