Changeset 143

Timestamp:

12/14/05 00:01:12 (19 years ago)

Author:

thauvin

Message:

• add dump_status

File:

• trunk/soft/ObsData/ObsData/Repository.pm (modified) (1 diff, 1 prop)

trunk/soft/ObsData/ObsData/Repository.pm

@@ -145 +145 @@
         $self->{status}->WriteConfig($self->{statusfile});
     }
+}
+
+=head3 dump_status($output)
+
+Dump current status file into $output, see Config::IniFiles,
+function WriteConfig
+
+=cut
+
+sub dump_status {
+    my ($self, $output) = @_;
+    $self->update_global_status;
+    $self->{status}->WriteConfig($output);
 }