From 4c0d9daaf25036e773a62a7e89e9ceaf523091e9 Mon Sep 17 00:00:00 2001
From: Norman Walsh <ndw@nwalsh.com>
Date: Fri, 24 May 2002 16:01:57 +0000
Subject: [PATCH] Improve warning message

---
 cvstools/nextversion | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/cvstools/nextversion b/cvstools/nextversion
index 68b3438dd..203e17c1c 100755
--- a/cvstools/nextversion
+++ b/cvstools/nextversion
@@ -27,6 +27,8 @@ my $pre = $1;
 my $fvers = $2;
 my $post = $3;
 
+my $oldver = $fvers;
+
 my @cvsbad = `cvs -n update 2>&1 | grep -v ^cvs`;
 if (@cvsbad) {
     print STDERR @cvsbad;
@@ -54,7 +56,7 @@ if ($fvers =~ /^(\d+)\.(\d+)\.(\d+)$/) {
 
 $version = "$fvers" if !$version;
 
-print "About to release $version; are you sure? ";
+print "About to release $version (previous $oldver); are you sure? ";
 chop($_ = scalar(<>));
 
 die "Aborted!\n" if !/^y/i;
-- 
2.40.0