From 59bc2b7d5861ac9e04faf4c1f2e39b41d3182aff Mon Sep 17 00:00:00 2001
From: Chris <chris@starforge.co.uk>
Date: Thu, 16 Aug 2012 14:00:58 +0100
Subject: [PATCH] No need for old _error functions now.

---
 Modules.pm | 26 --------------------------
 1 file changed, 26 deletions(-)

diff --git a/Modules.pm b/Modules.pm
index 9b6641d..26567f1 100644
--- a/Modules.pm
+++ b/Modules.pm
@@ -384,30 +384,4 @@ sub get_block_id {
     return $blockr ? $blockr -> [0] : undef;
 }
 
-
-# ============================================================================
-#  Error functions
-
-## @cmethod private $ set_error($errstr)
-# Set the class-wide errstr variable to an error message, and return undef. This
-# function supports error reporting in the constructor and other class methods.
-#
-# @param errstr The error message to store in the class errstr variable.
-# @return Always returns undef.
-sub set_error { $errstr = shift; return undef; }
-
-
-## @method private $ self_error($errstr)
-# Set the object's errstr value to an error message, and return undef. This
-# function supports error reporting in various methods throughout the class.
-#
-# @param errstr The error message to store in the object's errstr.
-# @return Always returns undef.
-sub self_error {
-    my $self = shift;
-    $self -> {"errstr"} = shift;
-
-    return undef;
-}
-
 1;