diff --git a/R/create_eventlogs.R b/R/create_eventlogs.R
index 170a2c5..5444728 100644
--- a/R/create_eventlogs.R
+++ b/R/create_eventlogs.R
@@ -91,7 +91,7 @@ create_eventlogs <- function(data, xmlpath = NULL, case_cutoff = 20,
     dat4$timeMs.stop[which(dat4$fIdDiff > 0)]
 
   dat4$fIdNum.start <- NULL
-  dat4$fIdNum.start <- NULL
+  dat4$fIdNum.stop  <- NULL
   dat4$fIdDiff      <- NULL
 
   # Remove fragmented traces ###############################################