-####################################################################
-##### Factoid related stuff...
-#####
-
-#####
-# Usage: &getFactInfo($faqtoid, type);
-sub getFactInfo {
- return &dbGet("factoids", $_[1], "factoid_key='$_[0]'");
-}
-
-#####
-# Usage: &getFactoid($faqtoid);
-sub getFactoid {
- return &getFactInfo($_[0], "factoid_value");
-}
-
-#####
-# Usage: &delFactoid($faqtoid);
-sub delFactoid {
- my ($faqtoid) = @_;
-
- &dbDel("factoids", "factoid_key",$faqtoid);
- &status("DELETED '$faqtoid'");
-
- return 1;
-}
-
-sub SQLDebug {
- return unless (&IsParam("SQLDebug"));
-
- return if (!fileno SQLDEBUG);
-
- print SQLDEBUG $_[0]."\n";
-}
-