--- trunk/lib/WebPAC/DB.pm	2005/07/17 22:28:11	21
+++ trunk/lib/WebPAC/DB.pm	2005/07/17 22:48:25	22
@@ -102,11 +102,11 @@
 	}
 }
 
-=head2 load_gs
+=head2 load_ds
 
 Retrive from disk one data_structure records using field 000 as key
 
-  my @ds = $db->load_gs($rec);
+  my @ds = $db->load_ds($rec);
 
 This function will also perform basic sanity checking on returned
 data and disable caching if data is corrupted (or changed since last
@@ -116,7 +116,7 @@
 
 =cut
 
-sub load_gs {
+sub load_ds {
 	my $self = shift;
 
 	return unless $self->{'path'};
@@ -161,11 +161,11 @@
 	return undef;
 }
 
-=head2 save_gs
+=head2 save_ds
 
 Store data_structure on disk.
 
-  $db->save_gs(
+  $db->save_ds(
 	ds => \@ds,
 	current_filename => $self->{'current_filename'},
 	headline => $self->{'headline'},
@@ -173,11 +173,11 @@
 
 B<Totally broken, but fast.>
 
-Depends on filename generated by C<load_gs>.
+Depends on filename generated by C<load_ds>.
 
 =cut
 
-sub save_gs {
+sub save_ds {
 	my $self = shift;
 
 	return unless($self->{'path'});
@@ -187,7 +187,7 @@
 
 	my $log = $self->_get_logger;
 
-	$log->logdie("save_gs without cache_file -- did you called gs_get before?") unless ($self->{'cache_file'});
+	$log->logdie("save_ds without cache_file -- did you called gs_get before?") unless ($self->{'cache_file'});
 
 	foreach my $e (qw/ds current_filename headline/) {
 		$log->logdie("missing $e") unless $arg->{$e};