my $oc = $Config{text_widget}->cget(-cursor);
$Config{text_widget}->configure(-cursor => 'watch');
speichere_aktuellen_ds();
speichere_daten();
$Config{text_widget}->configure(-cursor => $oc);