From df618fc367737a3b07cfcae7465a4600b5a0c063 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Wed, 20 Feb 2008 17:15:14 +0000 Subject: factorize selected_network_is_configured --- lib/network/connection.pm | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'lib/network/connection.pm') diff --git a/lib/network/connection.pm b/lib/network/connection.pm index 570935b..ca1eb28 100644 --- a/lib/network/connection.pm +++ b/lib/network/connection.pm @@ -119,6 +119,13 @@ sub get_selected_network { exists $self->{networks}{$self->{network}} && $self->{networks}{$self->{network}}; } +sub selected_network_is_configured { + my ($self) = @_; + + my $network = $self->get_selected_network or return; + $self->network_is_configured($network); +} + sub load_interface_settings { my ($self) = @_; require network::network; -- cgit v1.2.1