diff --git a/settings.pl b/settings.pl index 63977a9..7eedbdd 100644 --- a/settings.pl +++ b/settings.pl @@ -34,6 +34,25 @@ sub html_escape( $ ) return $s; } + +sub settings_nav_bar() +{ + return <<'EOF_NAV'; +
+EOF_NAV +} + +sub delete_confirm_attr( $ ) +{ + my $what = html_escape( $_[0] ); + return ' onclick="return confirm(\'Delete ' . $what . '?\')"'; +} + +$settings_nav_bar = settings_nav_bar(); + sub kernel_network_interfaces() { my %interfaces = (); @@ -1203,7 +1222,7 @@ EOF $c[1] ($c[2])