|
MVC/Model.pm |
sub register { my ($self, $viewer) = @_; $self->{viewers}->{$viewer} = $viewer; } sub deregister { my ($self, $viewer) = @_; delete $self->{viewers}->{$viewer}; } sub update { my ($self) = @_; foreach my $viewer (values %{$self->{viewers}}) { $viewer->update($self); } } 1; |
Neu hinzukommene Viewer können sich mit register
registrieren und dies später mit deregister
rückgängig machen.
| |
Klassen, die von MVC::Model abgeleitet sind,
müssen update aufrufen, wenn sich der Zustand
in einer von außen sichtbaren Weise verändert hat.
| |
Alle von MVC::Viewer abgeleiteten Klassen benötigen
eine Methode update, die für die Synchronisation
des aktuellen Zustands eines Modells mit der Präsentierung
verantwortlich ist.
|
Copyright © 1996, 1998, 1999, 2000 Andreas Borchert, in HTML konvertiert am 07.02.2000 |