#!/usr/bin/perl

$self->{texts} = {
  'Database update error:'      => 'Fehler beim Datenbankupgrade:',
};

$self->{subs} = {
  'do_query'                    => 'do_query',
  'do_update'                   => 'do_update',
  'mydberror'                   => 'mydberror',
  'print_question'              => 'print_question',
  'weiter'                      => 'continue',
};

1;