a tiny fix for auto-super.pl

Procedure to merge this branch into a branch with menuqc changes:

git fetch
git merge origin/master
git checkout origin/divVerent/menu-imprOOvements -- auto-super.pl
find . -type f -print0 | xargs -0 perl auto-super.pl
git commit -a
git merge origin/divVerent/menu-imprOOvements

The intermediate commit and auto-super.pl run is to prepare the menu code for the merge to reduce merge conflicts or compile errors in newly added files.

diff --git a/qcsrc/menu/auto-super.pl b/qcsrc/menu/auto-super.pl
index 9ea4bdaf253000a80ffe4dcb52fb7811c43d02c2..00926d06171631ffa09795dabca5b070658ce7f0 100644 (file)
--- a/qcsrc/menu/auto-super.pl
+++ b/qcsrc/menu/auto-super.pl
@@ -74,7 +74,7 @@ for my $f(@ARGV)
                $s =~ s/\b$_\b/$old2new{$_}/g;
        }
 
-       my @methods_super = map { [ $_ . $methods{$base}{$_}, "SUPER($class).$_" ]; } keys %{$methods{$base}};
+       my @methods_super = map { [ $methods{$base}{$_} . "_" . $_, "SUPER($class).$_" ]; } keys %{$methods{$base}};
        for(@methods_super)
        {
                my ($search, $replace) = @$_;