diff -Nru kgb-bot-1.54/Changes kgb-bot-1.55/Changes --- kgb-bot-1.54/Changes 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/Changes 2019-06-13 20:15:03.000000000 +0000 @@ -1,3 +1,10 @@ +1.55 (2019-06-13) + [ gregor herrmann ] + * fix typo in test diag() + + [ Damyan Ivanov ] + * fix coloring of failed pipelines (Closes: #930450) + 1.54 (2019-01-03) [ Damyan Ivanov ] * comment out the test client config example of message-template diff -Nru kgb-bot-1.54/debian/changelog kgb-bot-1.55/debian/changelog --- kgb-bot-1.54/debian/changelog 2019-01-03 10:23:40.000000000 +0000 +++ kgb-bot-1.55/debian/changelog 2019-07-06 23:30:31.000000000 +0000 @@ -1,3 +1,35 @@ +kgb-bot (1.55-2) unstable; urgency=medium + + * Upload to unstable. + * kgb-client: drop ancient Breaks/Replaces on kgb-client-git. + * Drop version constraint from libtest-compile-perl build dependency. + * Bump debhelper-compat to 12. + * Remove trailing whitespace from debian/*. + * Update years of copyright. + * Add Pre-Depends: ${misc:Pre-Depends} for kgb-bot in debian/control for + maintainer scripts after the bump to debhelper 12. + * Annotate test-only build dependencies with . + * debian/rules: drop override_dh_compress. debhelper 12 doesn't compress + examples any more. + * Comment out example channel in /etc/kgb-bot/kgb.conf. An installation + with the unchanged config would cause bots to appear in this channel. + (Closes: #927372) + * Add an entry to debian/NEWS about a pitfall with use_ssl and port in + /etc/kgb-bot/kgb.conf. (Closes: #910971) + + -- gregor herrmann Sun, 07 Jul 2019 01:30:31 +0200 + +kgb-bot (1.55-1) experimental; urgency=medium + + [ gregor herrmann ] + * fix typo in test diag() + + [ Damyan Ivanov ] + * fix coloring of failed pipelines (Closes: #930450) + * upload to experimental + + -- Damyan Ivanov Thu, 13 Jun 2019 20:11:57 +0000 + kgb-bot (1.54-1) unstable; urgency=medium [ Damyan Ivanov ] diff -Nru kgb-bot-1.54/debian/control kgb-bot-1.55/debian/control --- kgb-bot-1.54/debian/control 2019-01-03 10:23:40.000000000 +0000 +++ kgb-bot-1.55/debian/control 2019-07-06 23:30:31.000000000 +0000 @@ -4,44 +4,44 @@ Damyan Ivanov , gregor herrmann Section: devel +Testsuite: autopkgtest-pkg-perl Priority: optional -Build-Depends: debhelper-compat (= 11), +Build-Depends: debhelper-compat (= 12), libmodule-build-perl Build-Depends-Indep: perl, - libclass-accessor-perl, - libcpan-changes-perl, - libdbd-pg-perl, - libdpkg-perl, - libfile-remove-perl, - libfile-touch-perl, - libipc-run-perl, - libipc-system-simple-perl, - libjson-xs-perl, - libjson-rpc-perl, - libmonkey-patch-perl, - libnet-ip-perl, - libpoe-component-irc-perl, - libpoe-component-server-soap-perl, - libpoe-perl, - libproc-pid-file-perl, - libschedule-ratelimiter-perl, - libsoap-lite-perl, - libsvn-perl, - libtest-compile-perl (>= 0.19), - libtest-differences-perl, - libtest-exception-perl, - libtest-pod-coverage-perl, - libtest-pod-perl, - libwww-shorten-perl, - libyaml-perl, - git, - subversion, + libclass-accessor-perl , + libcpan-changes-perl , + libdbd-pg-perl , + libdpkg-perl , + libfile-remove-perl , + libfile-touch-perl , + libipc-run-perl , + libipc-system-simple-perl , + libjson-xs-perl , + libjson-rpc-perl , + libmonkey-patch-perl , + libnet-ip-perl , + libpoe-component-irc-perl , + libpoe-component-server-soap-perl , + libpoe-perl , + libproc-pid-file-perl , + libschedule-ratelimiter-perl , + libsoap-lite-perl , + libsvn-perl , + libtest-compile-perl , + libtest-differences-perl , + libtest-exception-perl , + libtest-pod-coverage-perl , + libtest-pod-perl , + libwww-shorten-perl , + libyaml-perl , + git , + subversion , locales-all Standards-Version: 4.3.0 Vcs-Browser: https://salsa.debian.org/kgb-team/kgb/ Vcs-Git: https://salsa.debian.org/kgb-team/kgb.git Homepage: https://salsa.debian.org/kgb-team/kgb/wikis/home -Testsuite: autopkgtest-pkg-perl Package: kgb-bot Architecture: all @@ -64,6 +64,7 @@ git Suggests: polygen, libfile-which-perl +Pre-Depends: ${misc:Pre-Depends} Description: IRC collaboration bot KGB is an IRC bot, helping people work together by notifying an IRC channel when a commit occurs. @@ -88,8 +89,6 @@ libwww-perl, libwww-shorten-perl Suggests: kgb-bot -Breaks: kgb-client-git (<= 1.28-1~) -Replaces: kgb-client-git (<= 1.28-1~) Description: client for KGB (IRC collaboration bot) KGB is an IRC bot, helping people work together by notifying an IRC channel when a commit occurs. diff -Nru kgb-bot-1.54/debian/copyright kgb-bot-1.55/debian/copyright --- kgb-bot-1.54/debian/copyright 2019-01-03 10:19:58.000000000 +0000 +++ kgb-bot-1.55/debian/copyright 2019-07-06 23:30:31.000000000 +0000 @@ -5,9 +5,9 @@ Files: * Copyright: - 2008-2013, Martín Ferrari + 2008-2018, Martín Ferrari 2008-2019, Damyan Ivanov - 2010-2016, gregor herrmann + 2010-2019, gregor herrmann 2018, James Clarke 2018, Colin Finck License: GPL-2+ @@ -20,4 +20,3 @@ . On Debian systems, the complete text of version 2 of the GNU General Public License can be found in `/usr/share/common-licenses/GPL-2'. - diff -Nru kgb-bot-1.54/debian/NEWS kgb-bot-1.55/debian/NEWS --- kgb-bot-1.54/debian/NEWS 2013-08-07 13:25:49.000000000 +0000 +++ kgb-bot-1.55/debian/NEWS 2019-07-06 23:30:31.000000000 +0000 @@ -1,3 +1,15 @@ +kgb-bot (1.55-1) unstable; urgency=medium + + Since 1.52, 'use_ssl' defaults to 1 for connecting to IRC servers. + + This can cause connection failures when /etc/kgb-bot/kgb.conf has an + explicit port set for an IRC network which doesn't support SSL on this port. + + Please update the port or remove the setting when the defaults (6697 when + use_ssl is true and 6667 otherwise) work for the network. + + -- gregor herrmann Sun, 07 Jul 2019 01:25:11 +0200 + kgb-bot (1.24-1) unstable; urgency=low The default port of the kgb-bot listener has changed to avoid conflict with diff -Nru kgb-bot-1.54/debian/patches/comment_out_example_channel.patch kgb-bot-1.55/debian/patches/comment_out_example_channel.patch --- kgb-bot-1.54/debian/patches/comment_out_example_channel.patch 1970-01-01 00:00:00.000000000 +0000 +++ kgb-bot-1.55/debian/patches/comment_out_example_channel.patch 2019-07-06 23:30:31.000000000 +0000 @@ -0,0 +1,34 @@ +Description: + * Comment out example channel in /etc/kgb-bot/kgb.conf. An installation + with the unchanged config would cause bots to appear in this channel. + (Closes: #927372) +Author: gregor herrmann +Bug-Debian: https://bugs.debian.org/927372 + +--- kgb-bot-1.55.orig/etc/kgb.conf ++++ kgb-bot-1.55/etc/kgb.conf +@@ -37,15 +37,15 @@ channels: + network: freenode + broadcast: yes + # a channel, tied to one or several repositories +- - name: '#foo' +- network: freenode +- repos: +- - foo +- # Can also be set per-channel +- #smart_answers: +- # - "I'm in ur channel, watching ur commits!" +- # - "I am not listening" +- # - "Shut up! I am buzy watching you." ++# - name: '#foo' ++# network: freenode ++# repos: ++# - foo ++# # Can also be set per-channel ++# #smart_answers: ++# # - "I'm in ur channel, watching ur commits!" ++# # - "I am not listening" ++# # - "Shut up! I am buzy watching you." + pid_dir: /var/run/kgb-bot + # anything less is rejected + min_protocol_ver: 1 diff -Nru kgb-bot-1.54/debian/patches/series kgb-bot-1.55/debian/patches/series --- kgb-bot-1.54/debian/patches/series 2018-02-06 18:21:55.000000000 +0000 +++ kgb-bot-1.55/debian/patches/series 2019-07-06 23:30:31.000000000 +0000 @@ -0,0 +1 @@ +comment_out_example_channel.patch diff -Nru kgb-bot-1.54/debian/rules kgb-bot-1.55/debian/rules --- kgb-bot-1.54/debian/rules 2018-02-20 20:58:54.000000000 +0000 +++ kgb-bot-1.55/debian/rules 2019-07-06 23:30:31.000000000 +0000 @@ -14,8 +14,5 @@ override_dh_auto_test: LANG=bg_BG.utf8 LC_ALL=bg_BG.utf8 dh_auto_test -override_dh_compress: - dh_compress -Xexamples - override_dh_missing: dh_missing --fail-missing diff -Nru kgb-bot-1.54/lib/App/KGB.pm kgb-bot-1.55/lib/App/KGB.pm --- kgb-bot-1.54/lib/App/KGB.pm 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/lib/App/KGB.pm 2019-06-13 20:15:03.000000000 +0000 @@ -31,7 +31,7 @@ =cut -our $VERSION = '1.54'; +our $VERSION = '1.55'; =head1 DESCRIPTION diff -Nru kgb-bot-1.54/META.json kgb-bot-1.55/META.json --- kgb-bot-1.54/META.json 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/META.json 2019-06-13 20:15:03.000000000 +0000 @@ -82,6 +82,6 @@ "http://www.gnu.org/licenses/old-licenses/gpl-2.0.txt" ] }, - "version" : "1.54", - "x_serialization_backend" : "JSON::PP version 4.00" + "version" : "1.55", + "x_serialization_backend" : "JSON::PP version 4.02" } diff -Nru kgb-bot-1.54/META.yml kgb-bot-1.55/META.yml --- kgb-bot-1.54/META.yml 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/META.yml 2019-06-13 20:15:03.000000000 +0000 @@ -61,5 +61,5 @@ perl: '5.010' resources: license: http://www.gnu.org/licenses/old-licenses/gpl-2.0.txt -version: '1.54' +version: '1.55' x_serialization_backend: 'CPAN::Meta::YAML version 0.018' diff -Nru kgb-bot-1.54/script/kgb-bot kgb-bot-1.55/script/kgb-bot --- kgb-bot-1.54/script/kgb-bot 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/script/kgb-bot 2019-06-13 20:15:03.000000000 +0000 @@ -2533,8 +2533,12 @@ if @{ $opts->{pipeline_only_status} } and not grep { $_ eq $status } @{ $opts->{pipeline_only_status} }; - $status = colorize( $status => $status ) - if $status =~ /^(?:success|failure)$/; + if ( $status eq 'success' ) { + $status = colorize( $status => $status ); + } + elsif ( $status eq 'failed' ) { + $status = colorize( failure => $status ); + } my $log; if ( my $duration = $body->{object_attributes}{duration} ) { diff -Nru kgb-bot-1.54/t/52-client-git.t kgb-bot-1.55/t/52-client-git.t --- kgb-bot-1.54/t/52-client-git.t 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/t/52-client-git.t 2019-06-13 20:15:03.000000000 +0000 @@ -31,7 +31,7 @@ my $tmp_cleanup = not $ENV{TEST_KEEP_TMP}; my $dir = tempdir( 'kgb-XXXXXXX', CLEANUP => $tmp_cleanup, DIR => File::Spec->tmpdir ); -diag "Temp directory $dir will pe kept" unless $tmp_cleanup; +diag "Temp directory $dir will be kept" unless $tmp_cleanup; my $test_bot = TestBot->start; diff -Nru kgb-bot-1.54/t/53-client-git-merges.t kgb-bot-1.55/t/53-client-git-merges.t --- kgb-bot-1.54/t/53-client-git-merges.t 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/t/53-client-git-merges.t 2019-06-13 20:15:03.000000000 +0000 @@ -29,7 +29,7 @@ my $tmp_cleanup = not $ENV{TEST_KEEP_TMP}; my $dir = tempdir( 'kgb-XXXXXXX', CLEANUP => $tmp_cleanup, DIR => File::Spec->tmpdir ); -diag "Temp directory $dir will pe kept" unless $tmp_cleanup; +diag "Temp directory $dir will be kept" unless $tmp_cleanup; my $test_bot = TestBot->start; diff -Nru kgb-bot-1.54/t/54-client-git-squash.t kgb-bot-1.55/t/54-client-git-squash.t --- kgb-bot-1.54/t/54-client-git-squash.t 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/t/54-client-git-squash.t 2019-06-13 20:15:03.000000000 +0000 @@ -29,7 +29,7 @@ my $tmp_cleanup = not $ENV{TEST_KEEP_TMP}; my $dir = tempdir( 'kgb-XXXXXXX', CLEANUP => $tmp_cleanup, DIR => File::Spec->tmpdir ); -diag "Temp directory $dir will pe kept" unless $tmp_cleanup; +diag "Temp directory $dir will be kept" unless $tmp_cleanup; my $test_bot = TestBot->start; diff -Nru kgb-bot-1.54/t/55-client-git-merges-ff.t kgb-bot-1.55/t/55-client-git-merges-ff.t --- kgb-bot-1.54/t/55-client-git-merges-ff.t 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/t/55-client-git-merges-ff.t 2019-06-13 20:15:03.000000000 +0000 @@ -29,7 +29,7 @@ my $tmp_cleanup = not $ENV{TEST_KEEP_TMP}; my $dir = tempdir( 'kgb-XXXXXXX', CLEANUP => $tmp_cleanup, DIR => File::Spec->tmpdir ); -diag "Temp directory $dir will pe kept" unless $tmp_cleanup; +diag "Temp directory $dir will be kept" unless $tmp_cleanup; my $test_bot = TestBot->start; diff -Nru kgb-bot-1.54/t/56-client-git-ff-merge-2.t kgb-bot-1.55/t/56-client-git-ff-merge-2.t --- kgb-bot-1.54/t/56-client-git-ff-merge-2.t 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/t/56-client-git-ff-merge-2.t 2019-06-13 20:15:03.000000000 +0000 @@ -29,7 +29,7 @@ my $tmp_cleanup = not $ENV{TEST_KEEP_TMP}; my $dir = tempdir( 'kgb-XXXXXXX', CLEANUP => $tmp_cleanup, DIR => File::Spec->tmpdir ); -diag "Temp directory $dir will pe kept" unless $tmp_cleanup; +diag "Temp directory $dir will be kept" unless $tmp_cleanup; my $test_bot = TestBot->start; diff -Nru kgb-bot-1.54/t/57-client-git-squash-tags.t kgb-bot-1.55/t/57-client-git-squash-tags.t --- kgb-bot-1.54/t/57-client-git-squash-tags.t 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/t/57-client-git-squash-tags.t 2019-06-13 20:15:03.000000000 +0000 @@ -29,7 +29,7 @@ my $tmp_cleanup = not $ENV{TEST_KEEP_TMP}; my $dir = tempdir( 'kgb-XXXXXXX', CLEANUP => $tmp_cleanup, DIR => File::Spec->tmpdir ); -diag "Temp directory $dir will pe kept" unless $tmp_cleanup; +diag "Temp directory $dir will be kept" unless $tmp_cleanup; my $test_bot = TestBot->start; diff -Nru kgb-bot-1.54/t/58-client-git-unicode.t kgb-bot-1.55/t/58-client-git-unicode.t --- kgb-bot-1.54/t/58-client-git-unicode.t 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/t/58-client-git-unicode.t 2019-06-13 20:15:03.000000000 +0000 @@ -32,7 +32,7 @@ my $tmp_cleanup = not $ENV{TEST_KEEP_TMP}; my $dir = tempdir( 'kgb-XXXXXXX', CLEANUP => $tmp_cleanup, DIR => File::Spec->tmpdir ); -diag "Temp directory $dir will pe kept" unless $tmp_cleanup; +diag "Temp directory $dir will be kept" unless $tmp_cleanup; my $test_bot = TestBot->start; diff -Nru kgb-bot-1.54/t/70-webhook-push.t kgb-bot-1.55/t/70-webhook-push.t --- kgb-bot-1.54/t/70-webhook-push.t 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/t/70-webhook-push.t 2019-06-13 20:15:03.000000000 +0000 @@ -30,7 +30,7 @@ my $tmp_cleanup = not $ENV{TEST_KEEP_TMP}; my $dir = tempdir( 'kgb-XXXXXXX', CLEANUP => $tmp_cleanup, DIR => File::Spec->tmpdir ); -diag "Temp directory $dir will pe kept" unless $tmp_cleanup; +diag "Temp directory $dir will be kept" unless $tmp_cleanup; my $test_bot = TestBot->start; diff -Nru kgb-bot-1.54/t/71-webhook-push_tag.t kgb-bot-1.55/t/71-webhook-push_tag.t --- kgb-bot-1.54/t/71-webhook-push_tag.t 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/t/71-webhook-push_tag.t 2019-06-13 20:15:03.000000000 +0000 @@ -30,7 +30,7 @@ my $tmp_cleanup = not $ENV{TEST_KEEP_TMP}; my $dir = tempdir( 'kgb-XXXXXXX', CLEANUP => $tmp_cleanup, DIR => File::Spec->tmpdir ); -diag "Temp directory $dir will pe kept" unless $tmp_cleanup; +diag "Temp directory $dir will be kept" unless $tmp_cleanup; my $test_bot = TestBot->start; diff -Nru kgb-bot-1.54/t/72-webhook-wiki_page.t kgb-bot-1.55/t/72-webhook-wiki_page.t --- kgb-bot-1.54/t/72-webhook-wiki_page.t 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/t/72-webhook-wiki_page.t 2019-06-13 20:15:03.000000000 +0000 @@ -30,7 +30,7 @@ my $tmp_cleanup = not $ENV{TEST_KEEP_TMP}; my $dir = tempdir( 'kgb-XXXXXXX', CLEANUP => $tmp_cleanup, DIR => File::Spec->tmpdir ); -diag "Temp directory $dir will pe kept" unless $tmp_cleanup; +diag "Temp directory $dir will be kept" unless $tmp_cleanup; my $test_bot = TestBot->start; diff -Nru kgb-bot-1.54/t/73-webhook-issue.t kgb-bot-1.55/t/73-webhook-issue.t --- kgb-bot-1.54/t/73-webhook-issue.t 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/t/73-webhook-issue.t 2019-06-13 20:15:03.000000000 +0000 @@ -30,7 +30,7 @@ my $tmp_cleanup = not $ENV{TEST_KEEP_TMP}; my $dir = tempdir( 'kgb-XXXXXXX', CLEANUP => $tmp_cleanup, DIR => File::Spec->tmpdir ); -diag "Temp directory $dir will pe kept" unless $tmp_cleanup; +diag "Temp directory $dir will be kept" unless $tmp_cleanup; my $test_bot = TestBot->start; diff -Nru kgb-bot-1.54/t/74-webhook-notes.t kgb-bot-1.55/t/74-webhook-notes.t --- kgb-bot-1.54/t/74-webhook-notes.t 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/t/74-webhook-notes.t 2019-06-13 20:15:03.000000000 +0000 @@ -34,7 +34,7 @@ CLEANUP => $tmp_cleanup, DIR => File::Spec->tmpdir ); -diag "Temp directory $dir will pe kept" unless $tmp_cleanup; +diag "Temp directory $dir will be kept" unless $tmp_cleanup; my $test_bot = TestBot->start; diff -Nru kgb-bot-1.54/t/75-webhook-merge-request.t kgb-bot-1.55/t/75-webhook-merge-request.t --- kgb-bot-1.54/t/75-webhook-merge-request.t 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/t/75-webhook-merge-request.t 2019-06-13 20:15:03.000000000 +0000 @@ -34,7 +34,7 @@ CLEANUP => $tmp_cleanup, DIR => File::Spec->tmpdir ); -diag "Temp directory $dir will pe kept" unless $tmp_cleanup; +diag "Temp directory $dir will be kept" unless $tmp_cleanup; my $test_bot = TestBot->start; diff -Nru kgb-bot-1.54/t/76-webhook-pipeline.t kgb-bot-1.55/t/76-webhook-pipeline.t --- kgb-bot-1.54/t/76-webhook-pipeline.t 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/t/76-webhook-pipeline.t 2019-06-13 20:15:03.000000000 +0000 @@ -34,7 +34,7 @@ CLEANUP => $tmp_cleanup, DIR => File::Spec->tmpdir ); -diag "Temp directory $dir will pe kept" unless $tmp_cleanup; +diag "Temp directory $dir will be kept" unless $tmp_cleanup; my $test_bot = TestBot->start; diff -Nru kgb-bot-1.54/t/77-webhook-build.t kgb-bot-1.55/t/77-webhook-build.t --- kgb-bot-1.54/t/77-webhook-build.t 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/t/77-webhook-build.t 2019-06-13 20:15:03.000000000 +0000 @@ -34,7 +34,7 @@ CLEANUP => $tmp_cleanup, DIR => File::Spec->tmpdir ); -diag "Temp directory $dir will pe kept" unless $tmp_cleanup; +diag "Temp directory $dir will be kept" unless $tmp_cleanup; my $test_bot = TestBot->start; diff -Nru kgb-bot-1.54/t/78-webhook-push-squash.t kgb-bot-1.55/t/78-webhook-push-squash.t --- kgb-bot-1.54/t/78-webhook-push-squash.t 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/t/78-webhook-push-squash.t 2019-06-13 20:15:03.000000000 +0000 @@ -30,7 +30,7 @@ my $tmp_cleanup = not $ENV{TEST_KEEP_TMP}; my $dir = tempdir( 'kgb-XXXXXXX', CLEANUP => $tmp_cleanup, DIR => File::Spec->tmpdir ); -diag "Temp directory $dir will pe kept" unless $tmp_cleanup; +diag "Temp directory $dir will be kept" unless $tmp_cleanup; my $test_bot = TestBot->start; diff -Nru kgb-bot-1.54/t/79-webhook-push-author.t kgb-bot-1.55/t/79-webhook-push-author.t --- kgb-bot-1.54/t/79-webhook-push-author.t 2019-01-03 10:21:31.000000000 +0000 +++ kgb-bot-1.55/t/79-webhook-push-author.t 2019-06-13 20:15:03.000000000 +0000 @@ -30,7 +30,7 @@ my $tmp_cleanup = not $ENV{TEST_KEEP_TMP}; my $dir = tempdir( 'kgb-XXXXXXX', CLEANUP => $tmp_cleanup, DIR => File::Spec->tmpdir ); -diag "Temp directory $dir will pe kept" unless $tmp_cleanup; +diag "Temp directory $dir will be kept" unless $tmp_cleanup; my $test_bot = TestBot->start;