From c5ccf1750dd00e8c4374162b302a0946f7fe3a96 Mon Sep 17 00:00:00 2001
From: Arch Librarian <arch@canonical.com>
Date: Mon, 20 Sep 2004 16:55:44 +0000
Subject: Bug fixes, new major version Author: jgg Date: 2000-01-27 04:15:09
 GMT Bug fixes, new major version

---
 dselect/install | 6 ++++++
 dselect/setup   | 2 +-
 2 files changed, 7 insertions(+), 1 deletion(-)

(limited to 'dselect')

diff --git a/dselect/install b/dselect/install
index 93a0f1e44..3fbab73cf 100755
--- a/dselect/install
+++ b/dselect/install
@@ -39,6 +39,7 @@ yesno() {
 	echo $ans | tr YN yn
 }
 
+OLDLS=`ls -ld $ARCHIVES`
 if [ x$WAIT = "xyes" ]; then
    $APTGET $OPTS -d dselect-upgrade
    echo "Press enter to continue." && read RES
@@ -61,6 +62,11 @@ if [ $RES -eq 0 ]; then
         -eq 0 ]; then
       exit 0
    fi
+
+   NEWLS=`ls -ld $ARCHIVES`
+   if [ "x$OLDLS" == "x$NEWLS" ]; then
+      exit 0
+   fi
    
    # Check the cleaning mode
    case `echo $CLEAN | tr '[:upper:]' '[:lower:]'` in
diff --git a/dselect/setup b/dselect/setup
index 86055d0a1..8386d9000 100755
--- a/dselect/setup
+++ b/dselect/setup
@@ -269,7 +269,7 @@ sub main {
     print "-" x 72, "\n";
     &print_config('Config' => \@Oldconfig);
     print "-" x 72, "\n";
-    print "$boldon Do you wish to change it?[y/N]$boldoff ";
+    print "$boldon Do you wish to change (overwrite) it?[y/N]$boldoff ";
     my $answer = <STDIN>;
     chomp ($answer);
     $answer =~ s/\s+/ /og;
-- 
cgit v1.2.3