From e611222f41922419819e9cbe3e2f1e66d5000543 Mon Sep 17 00:00:00 2001 From: Arne Fitzenreiter Date: Sun, 13 Jul 2014 12:46:41 +0200 Subject: [PATCH] ddns.cgi: fix convert at update. --- html/cgi-bin/ddns.cgi | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) diff --git a/html/cgi-bin/ddns.cgi b/html/cgi-bin/ddns.cgi index 738e6ecfbc..fd6204a59c 100644 --- a/html/cgi-bin/ddns.cgi +++ b/html/cgi-bin/ddns.cgi @@ -29,12 +29,6 @@ require '/var/ipfire/general-functions.pl'; require "${General::swroot}/lang.pl"; require "${General::swroot}/header.pl"; -# Hook to regenerate the configuration files, if cgi got called from command line. -if ($ENV{"REMOTE_ADDR"} eq "") { - &GenerateDDNSConfigFile(); - exit(0); -} - #workaround to suppress a warning when a variable is used only once my @dummy = ( ${Header::table2colour}, ${Header::colouryellow} ); undef (@dummy); @@ -72,6 +66,15 @@ $settings{'SERVICE'} = ''; $settings{'ACTION'} = ''; +# Get supported ddns providers. +my @providers = &GetProviders(); + +# Hook to regenerate the configuration files, if cgi got called from command line. +if ($ENV{"REMOTE_ADDR"} eq "") { + &GenerateDDNSConfigFile(); + exit(0); +} + &Header::showhttpheaders(); #Get GUI values @@ -82,9 +85,6 @@ open(FILE, "$datafile") or die "Unable to open $datafile."; my @current = ; close (FILE); -# Get supported ddns providers. -my @providers = &GetProviders(); - # # Save General Settings. # -- 2.39.2