Changeset 6502

Timestamp:

Feb 27, 2006, 5:44:32 PM (20 years ago)

Author:

jhoblitt

Message:

add ->request() stub that dies

File:

• trunk/DataStore/lib/DataStore/Record.pm (modified) (3 diffs)

trunk/DataStore/lib/DataStore/Record.pm

@@ -1 +1 @@
 # Copyright (C) 2006  Joshua Hoblitt
 #
-# $Id: Record.pm,v 1.2 2006-02-28 03:02:12 jhoblitt Exp $
+# $Id: Record.pm,v 1.3 2006-02-28 03:44:32 jhoblitt Exp $
 
 package DataStore::Record;
@@ -13 +13 @@
 use base qw( Class::Accessor::Fast );
 
-use Carp qw( carp );
+use Carp qw( carp croak );
 use Data::Validate::URI qw( is_http_uri );
 use Params::Validate qw( validate_with validate SCALAR );
@@ -83 +83 @@
 =cut
 
+=item * C<request()>
+
+=cut
+
+sub request
+{
+    croak "sub classes of " . __PACKAGE__
+        . " must override the ->request() method";
+}
+
 1;