granicus.if.org Git - postgresql/blob - src/bin/scripts/t/011_clusterdb_all.pl

   1 use strict;
   2 use warnings;
   3
   4 use PostgresNode;
   5 use TestLib;
   6 use Test::More tests => 2;
   7
   8 my $node = get_new_node();
   9 $node->init;
  10 $node->start;
  11
  12 # clusterdb -a is not compatible with -d, hence enforce environment variable
  13 # correctly.
  14 $ENV{PGDATABASE} = 'postgres';
  15
  16 $node->issues_sql_like(
  17         [ 'clusterdb', '-a' ],
  18         qr/statement: CLUSTER.*statement: CLUSTER/s,
  19         'cluster all databases');