From: dms <dms@c11ca15a-4712-0410-83d8-924469b57eb5>
Date: Wed, 28 Feb 2001 12:17:36 +0000 (+0000)
Subject: don't backup #DEL# factoids. asuffield.
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=e2ac755b176d47e484467e5267e646f4ed23615d;p=infobot.git

don't backup #DEL# factoids. asuffield.


git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk@420 c11ca15a-4712-0410-83d8-924469b57eb5
---

diff --git a/blootbot/src/Process.pl b/blootbot/src/Process.pl
index 600729d..5e59a02 100644
--- a/blootbot/src/Process.pl
+++ b/blootbot/src/Process.pl
@@ -401,14 +401,22 @@ sub FactoidStuff {
 	    return 'locked factoid' if (&IsLocked($faqtoid) == 1);
 
 	    if (&IsParam("factoidDeleteDelay")) {
+		if ($faqtoid =~ /#DEL#/ and !&IsFlag("o")) {
+		    &msg($who, "cannot delete it ($faqtoid).");
+		    return;
+		}
 		&status("forgot (safe delete): <$who> '$faqtoid' =is=> '$result'");
 		### TODO: check if the "backup" exists and overwrite it
 		my $check = &getFactoid("$faqtoid #DEL#");
 		if (!$check) {
-		    &setFactInfo($faqtoid, "factoid_key", $faqtoid." #DEL#");
-
-		    &setFactInfo($faqtoid, "modified_by", $who);
-		    &setFactInfo($faqtoid, "modified_time", time());
+		    if ($faqtoid !~ /#DEL#/) {
+			&setFactInfo($faqtoid, "factoid_key", $faqtoid." #DEL#");
+
+			&setFactInfo($faqtoid, "modified_by", $who);
+			&setFactInfo($faqtoid, "modified_time", time());
+		    } else {
+			&status("not backing up $faqtoid.");
+		    }
 		} else {
 		    &status("forget: not overwriting backup!");
 		}