summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xperl-install/standalone/harddrake25
1 files changed, 0 insertions, 5 deletions
diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2
index 08a81b913..0ee0c4b35 100755
--- a/perl-install/standalone/harddrake2
+++ b/perl-install/standalone/harddrake2
@@ -583,11 +583,6 @@ sub show_hide {
if ($bool) { $button->show } else { $button->hide }
}
-
-sub strip_first_underscore {
- join '', map { s/_//; $_ } @_;
-}
-
sub lookup_field {
my ($field) = @_;
my $class = find { defined $fields{$_} && defined $fields{$_}{$field} } ($current_class, 'generic');