diff options
| -rw-r--r-- | t/CP_Testing.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/t/CP_Testing.pm b/t/CP_Testing.pm index db4dd852b..28ff60b3f 100644 --- a/t/CP_Testing.pm +++ b/t/CP_Testing.pm @@ -478,6 +478,11 @@ sub get_host { return $self->{shorthost} || $self->{dbhost}; } +sub get_port { + my $self = shift; + return 5432; +} + sub get_shorthost { my $self = shift; return $self->{shorthost}; |