You are viewing a plain text version of this content. The canonical link for it is here.

Posted to commits@subversion.apache.org by da...@apache.org on 2013/05/14 17:25:45 UTC

svn commit: r1482391 - /subversion/trunk/tools/dist/backport.pl

Author: danielsh
Date: Tue May 14 15:25:44 2013
New Revision: 1482391

URL: http://svn.apache.org/r1482391
Log:
backport.pl: Add an assertion.

* tools/dist/backport.pl
  (prompt): Assert that $YES is unset.

Modified:
    subversion/trunk/tools/dist/backport.pl

Modified: subversion/trunk/tools/dist/backport.pl
URL: http://svn.apache.org/viewvc/subversion/trunk/tools/dist/backport.pl?rev=1482391&r1=1482390&r2=1482391&view=diff
==============================================================================
--- subversion/trunk/tools/dist/backport.pl (original)
+++ subversion/trunk/tools/dist/backport.pl Tue May 14 15:25:44 2013
@@ -67,6 +67,7 @@ sub prompt {
   local $\; # disable 'perl -l' effects
   print "$_[0] ";
 
+  die "$0: called prompt() in non-interactive mode!" if $YES;
   # TODO: this part was written by trial-and-error
   ReadMode 'cbreak';
   my $answer = (ReadKey 0);