This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Allow -Uusedtrace / -Dusedtrace=false / -Dusedtrace=no
authorH.Merijn Brand <h.m.brand@xs4all.nl>
Tue, 9 Jul 2019 15:16:04 +0000 (17:16 +0200)
committerH.Merijn Brand <h.m.brand@xs4all.nl>
Tue, 9 Jul 2019 15:16:04 +0000 (17:16 +0200)
Configure

index 0edf516..5c02255 100755 (executable)
--- a/Configure
+++ b/Configure
@@ -8110,6 +8110,10 @@ while $test 1 ; do
        $define|true|[yY]*)
                dflt='y'
                ;;
        $define|true|[yY]*)
                dflt='y'
                ;;
+       $undef|false|[nN]*)
+               dflt='n'
+               dflt_dtrace=""
+               ;;
        ?*)
                dflt='y'
                dflt_dtrace=$usedtrace
        ?*)
                dflt='y'
                dflt_dtrace=$usedtrace