From 1b50cccf89ca6f3db98e32ac0993b72d7668f387 Mon Sep 17 00:00:00 2001
From: forchard <forchard@protonmail.com>
Date: Thu, 7 May 2026 22:32:54 +0200
Subject: [PATCH] Fixing Issue #105 error on search loop after discard history
 is clicked

---
 episomer/DESCRIPTION | 2 +-
 episomer/R/plans.R   | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/episomer/DESCRIPTION b/episomer/DESCRIPTION
index 5671c27..1de141a 100644
--- a/episomer/DESCRIPTION
+++ b/episomer/DESCRIPTION
@@ -1,6 +1,6 @@
 Package: episomer
 Title: Early Detection of Public Health Threats from Social Media Data
-Version: 3.0.34
+Version: 3.0.35
 Authors@R: c( 
      person(given = "Laura",
             family = "Espinosa",
diff --git a/episomer/R/plans.R b/episomer/R/plans.R
index 41cfcaf..ebb1ee4 100644
--- a/episomer/R/plans.R
+++ b/episomer/R/plans.R
@@ -185,7 +185,7 @@ finish_plans <- function(plans = list()) {
   } else {
     # creating a new plan if expected end has passed
     lapply(plans, function(p) {
-      attr <- list(
+      attrs <- list(
         network = p$network,
         expected_end = strftime(
           if (is.null(p$end_on)) {
@@ -216,7 +216,7 @@ finish_plans <- function(plans = list()) {
         progress = 1.0
       )
 
-      updated <- do.call(parse_plan, attrs)
+      updated <- do.call(parse_plan_attributes, attrs)
       merge_plans(p, updated)
     })
   }