Skip to content
Snippets Groups Projects
Commit e325fb17 authored by Laurent Destailleur's avatar Laurent Destailleur
Browse files

Ajout attente interactive sur script mise a niveau donnees pgsql

parent d1358b1d
No related branches found
No related tags found
No related merge requests found
Show whitespace changes
Inline Side-by-side
build/dolibarr_mysql2pgsql.pl
+ 4
− 3
View file @ e325fb17
...@@ -15,7 +15,7 @@ use Data::Dumper; ...@@ -15,7 +15,7 @@ use Data::Dumper;
use Getopt::Long; use Getopt::Long;
use strict; use strict;
use vars qw/ $DIR $PROG $Extension $SOURCE $DESTI %filelist /; use vars qw/ $DIR $PROG $Extension $SOURCE $DESTI %filelist $stop /;
# command line options # command line options
my( $opt_debug, $opt_help); my( $opt_debug, $opt_help);
...@@ -343,7 +343,8 @@ foreach my $file (keys %filelist) { ...@@ -343,7 +343,8 @@ foreach my $file (keys %filelist) {
print "\n"; print "\n";
print "Build ".(scalar keys %filelist)." file(s).\n"; print "Build ".(scalar keys %filelist)." file(s).\n";
print "\n";
sleep(3); print "Press a key to finish...\n";
$stop=<STDIN>;
0; 0;
\ No newline at end of file
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment