--- nfo/perl/libs/Data/Query/Element/LV.pm	2002/12/27 16:03:58	1.1
+++ nfo/perl/libs/Data/Query/Element/LV.pm	2003/02/11 11:12:44	1.2
@@ -1,7 +1,10 @@
 ##  --------------------------------------------------------------------------------
-##  $Id: LV.pm,v 1.1 2002/12/27 16:03:58 joko Exp $
+##  $Id: LV.pm,v 1.2 2003/02/11 11:12:44 joko Exp $
 ##  --------------------------------------------------------------------------------
 ##  $Log: LV.pm,v $
+##  Revision 1.2  2003/02/11 11:12:44  joko
+##  + sub get
+##
 ##  Revision 1.1  2002/12/27 16:03:58  joko
 ##  + initial check-in
 ##
@@ -64,4 +67,9 @@
   return $self->{value} = shift;
 }
 
+sub get {
+  my $self = shift;
+  return $self->value();
+}
+
 1;