diff --git a/DESCRIPTION b/DESCRIPTION
index ecb8bff82b6da584b0fb4709b6cfc013867b4c1f..b89fb596963e4add7cac6064c6e581c8efd2d1fd 100755
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: RMassBank
 Type: Package
 Title: Workflow to process tandem MS files and build MassBank records
-Version: 0.99.3
+Version: 0.99.4
 Author: Michael Stravs, Emma Schymanski
 Maintainer: Michael Stravs, Emma Schymanski <massbank@eawag.ch>
 Description: Workflow to process tandem MS files and build MassBank records.
diff --git a/R/leMsMs.r b/R/leMsMs.r
index deeba3043bc90caf7f46b206b7599e2380e1ca60..ae518ab95dd18d5ab1c31c97167ae3c22b2dfbf8 100755
--- a/R/leMsMs.r
+++ b/R/leMsMs.r
@@ -109,7 +109,7 @@ msmsWorkflow <- function(w, mode="pH", steps=c(1:8),confirmMode = FALSE, newReca
 				  return(s)
 			  })
 	  for(f in w@files)
-		  w@analyzedSpecs[[basename(as.character(f))]]$name <<- basename(as.character(f))
+		  w@analyzedSpecs[[basename(as.character(f))]]$name <- basename(as.character(f))
 	  close(pb)
   }
   # Step 3: aggregate all spectra