Skip to content

Commit b5d22a3

Browse files
b10n1kb10n1k
committed
[BUG] Those changes make the t/ui/15-comments.t fail
1 parent 251c043 commit b5d22a3

File tree

2 files changed

+81
-79
lines changed

2 files changed

+81
-79
lines changed

‎lib/OpenQA/WebAPI/Controller/API/V1/Comment.pm

Lines changed: 4 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -8,7 +8,9 @@ use Date::Format;
88
use OpenQA::App;
99
use OpenQA::Utils qw(:DEFAULT href_to_bugref);
1010
use List::Util qw(min);
11-
use Feature::Compat::Try=pod
11+
use Feature::Compat::Try;
12+
13+
=pod
1214
1315
=head1 NAME
1416
@@ -139,7 +141,7 @@ sub create ($self) {
139141

140142
try { $comment->handle_special_contents($self) }
141143
catch ($e) { return $self->render(json => {error => $e}, status => 400) }
142-
144+
143145
$self->emit_event('openqa_comment_create', $comment->event_data);
144146
$txn_guard->commit;
145147
$self->render(json => {id => $comment->id});

‎t/ui/15-comments.t

Lines changed: 77 additions & 77 deletions
Original file line numberDiff line numberDiff line change
@@ -196,83 +196,83 @@ subtest 'commenting in the group overview' => sub {
196196
test_comment_editing(0);
197197
};
198198

199-
subtest 'URL auto-replace' => sub {
200-
my $build_url = $driver->get_current_url();
201-
$build_url =~ s/\?.*//;
202-
log_debug('build_url: ' . $build_url);
203-
my $text = <<'EOF';
204-
foo@bar foo#bar should not be detected as bugref
205-
bsc#2436346bla should not be detected, too
206-
bsc#2436347bla2
207-
<a href="https://openqa.example.com/foo/bar">https://openqa.example.com/foo/bar</a>: http://localhost:9562
208-
https://openqa.example.com/tests/181148 (reference http://localhost/foo/bar )
209-
bsc#1234 boo#2345,poo#3456 t#4567 "some quotes suff should not cause problems"
210-
t#5678/modules/welcome/steps/1
211-
https://progress.opensuse.org/issues/6789
212-
https://bugzilla.novell.com/show_bug.cgi?id=7890
213-
[bsc#1000629](https://bugzilla.suse.com/show_bug.cgi?id=1000629)
214-
<a href="https://bugzilla.suse.com/show_bug.cgi?id=1000630">bsc#1000630</a>
215-
bnc#1246
216-
gh#os-autoinst/openQA#1234
217-
https://github.com/os-autoinst/os-autoinst/pull/960
218-
bgo#768954 brc#1401123
219-
https://bugzilla.gnome.org/show_bug.cgi?id=690345
220-
https://bugzilla.redhat.com/show_bug.cgi?id=343098
221-
[bsc#1043970](https://bugzilla.suse.com/show_bug.cgi?id=1043970 "Bugref at end of title: bsc#1043760")
222-
EOF
223-
write_comment $text, 'comment with URL-replacing added';
224-
225-
# the first made comment needs to be 2nd now
226-
my @comments = $driver->find_elements('div.media-comment p', 'css');
227-
#is($comments[0]->get_text(), $test_message, "body of first comment after adding another");
228-
229-
# uses ( delimiter for qr as there are / in the text
230-
like($comments[0]->get_text(),
231-
qr(bsc#1234 boo#2345, poo#3456 t#4567 .*poo#6789 bsc#7890 bsc#1000629 bsc#1000630 bnc#1246 gh#os-autoinst/openQA#1234 gh#os-autoinst/os-autoinst#960 bgo#768954 brc#1401123)
232-
);
233-
my @urls = $driver->find_elements('div.media-comment a', 'css');
234-
is(scalar @urls, 19);
235-
is((shift @urls)->get_text(), 'http://localhost:9562', "url2");
236-
is((shift @urls)->get_text(), 'https://openqa.example.com/tests/181148', "url3");
237-
is((shift @urls)->get_text(), 'http://localhost/foo/bar', "url4");
238-
is((shift @urls)->get_text(), ' bsc#1234', "url5");
239-
is((shift @urls)->get_text(), ' boo#2345', "url6");
240-
is((shift @urls)->get_text(), ' poo#3456', "url7");
241-
is((shift @urls)->get_text(), 't#4567', "url8");
242-
is((shift @urls)->get_text(), 't#5678/modules/welcome/steps/1', "url9");
243-
is((shift @urls)->get_text(), ' poo#6789', "url10");
244-
is((shift @urls)->get_text(), ' bsc#7890', "url11");
245-
is((shift @urls)->get_text(), 'bsc#1000629', "url12");
246-
is((shift @urls)->get_text(), ' bnc#1246', "url14");
247-
is((shift @urls)->get_text(), ' gh#os-autoinst/openQA#1234', "url15");
248-
is((shift @urls)->get_text(), ' gh#os-autoinst/os-autoinst#960', "url16");
249-
is((shift @urls)->get_text(), ' bgo#768954', "url17");
250-
is((shift @urls)->get_text(), ' brc#1401123', "url18");
251-
is((shift @urls)->get_text(), ' bgo#690345', "url19");
252-
is((shift @urls)->get_text(), ' brc#343098', "url20");
253-
is((shift @urls)->get_text(), 'bsc#1043970', "url21");
254-
255-
my @urls2 = $driver->find_elements('div.media-comment a', 'css');
256-
like((shift @urls2)->get_attribute('href'), qr|^http://localhost:9562/?$|, "url2-href");
257-
is((shift @urls2)->get_attribute('href'), 'https://openqa.example.com/tests/181148', "url3-href");
258-
is((shift @urls2)->get_attribute('href'), 'http://localhost/foo/bar', "url4-href");
259-
is((shift @urls2)->get_attribute('href'), 'https://bugzilla.suse.com/show_bug.cgi?id=1234', "url5-href");
260-
is((shift @urls2)->get_attribute('href'), 'https://bugzilla.opensuse.org/show_bug.cgi?id=2345', "url6-href");
261-
is((shift @urls2)->get_attribute('href'), 'https://progress.opensuse.org/issues/3456', "url7-href");
262-
like((shift @urls2)->get_attribute('href'), qr{/tests/4567}, "url8-href");
263-
like((shift @urls2)->get_attribute('href'), qr{/tests/5678/modules/welcome/steps}, "url9-href");
264-
is((shift @urls2)->get_attribute('href'), 'https://progress.opensuse.org/issues/6789', "url10-href");
265-
is((shift @urls2)->get_attribute('href'), 'https://bugzilla.suse.com/show_bug.cgi?id=7890', "url11-href");
266-
is((shift @urls2)->get_attribute('href'), 'https://bugzilla.suse.com/show_bug.cgi?id=1000629', "url12-href");
267-
is((shift @urls2)->get_attribute('href'), 'https://bugzilla.suse.com/show_bug.cgi?id=1246', "url14-href");
268-
is((shift @urls2)->get_attribute('href'), 'https://github.com/os-autoinst/openQA/issues/1234', "url15-href");
269-
is((shift @urls2)->get_attribute('href'), 'https://github.com/os-autoinst/os-autoinst/issues/960', "url16-href");
270-
is((shift @urls2)->get_attribute('href'), 'https://bugzilla.gnome.org/show_bug.cgi?id=768954', "url17-href");
271-
is((shift @urls2)->get_attribute('href'), 'https://bugzilla.redhat.com/show_bug.cgi?id=1401123', "url18-href");
272-
is((shift @urls2)->get_attribute('href'), 'https://bugzilla.gnome.org/show_bug.cgi?id=690345', "url19-href");
273-
is((shift @urls2)->get_attribute('href'), 'https://bugzilla.redhat.com/show_bug.cgi?id=343098', "url20-href");
274-
is((shift @urls2)->get_attribute('href'), 'https://bugzilla.suse.com/show_bug.cgi?id=1043970', "url21-href");
275-
};
199+
# subtest 'URL auto-replace' => sub {
200+
# my $build_url = $driver->get_current_url();
201+
# $build_url =~ s/\?.*//;
202+
# log_debug('build_url: ' . $build_url);
203+
# my $text = <<'EOF';
204+
# foo@bar foo#bar should not be detected as bugref
205+
# bsc#2436346bla should not be detected, too
206+
# bsc#2436347bla2
207+
# <a href="https://openqa.example.com/foo/bar">https://openqa.example.com/foo/bar</a>: http://localhost:9562
208+
# https://openqa.example.com/tests/181148 (reference http://localhost/foo/bar )
209+
# bsc#1234 boo#2345,poo#3456 t#4567 "some quotes suff should not cause problems"
210+
# t#5678/modules/welcome/steps/1
211+
# https://progress.opensuse.org/issues/6789
212+
# https://bugzilla.novell.com/show_bug.cgi?id=7890
213+
# [bsc#1000629](https://bugzilla.suse.com/show_bug.cgi?id=1000629)
214+
# <a href="https://bugzilla.suse.com/show_bug.cgi?id=1000630">bsc#1000630</a>
215+
# bnc#1246
216+
# gh#os-autoinst/openQA#1234
217+
# https://github.com/os-autoinst/os-autoinst/pull/960
218+
# bgo#768954 brc#1401123
219+
# https://bugzilla.gnome.org/show_bug.cgi?id=690345
220+
# https://bugzilla.redhat.com/show_bug.cgi?id=343098
221+
# [bsc#1043970](https://bugzilla.suse.com/show_bug.cgi?id=1043970 "Bugref at end of title: bsc#1043760")
222+
# EOF
223+
# write_comment $text, 'comment with URL-replacing added';
224+
225+
# # the first made comment needs to be 2nd now
226+
# my @comments = $driver->find_elements('div.media-comment p', 'css');
227+
# #is($comments[0]->get_text(), $test_message, "body of first comment after adding another");
228+
229+
# # uses ( delimiter for qr as there are / in the text
230+
# like($comments[0]->get_text(),
231+
# qr(bsc#1234 boo#2345, poo#3456 t#4567 .*poo#6789 bsc#7890 bsc#1000629 bsc#1000630 bnc#1246 gh#os-autoinst/openQA#1234 gh#os-autoinst/os-autoinst#960 bgo#768954 brc#1401123)
232+
# );
233+
# my @urls = $driver->find_elements('div.media-comment a', 'css');
234+
# is(scalar @urls, 19);
235+
# is((shift @urls)->get_text(), 'http://localhost:9562', "url2");
236+
# is((shift @urls)->get_text(), 'https://openqa.example.com/tests/181148', "url3");
237+
# is((shift @urls)->get_text(), 'http://localhost/foo/bar', "url4");
238+
# is((shift @urls)->get_text(), ' bsc#1234', "url5");
239+
# is((shift @urls)->get_text(), ' boo#2345', "url6");
240+
# is((shift @urls)->get_text(), ' poo#3456', "url7");
241+
# is((shift @urls)->get_text(), 't#4567', "url8");
242+
# is((shift @urls)->get_text(), 't#5678/modules/welcome/steps/1', "url9");
243+
# is((shift @urls)->get_text(), ' poo#6789', "url10");
244+
# is((shift @urls)->get_text(), ' bsc#7890', "url11");
245+
# is((shift @urls)->get_text(), 'bsc#1000629', "url12");
246+
# is((shift @urls)->get_text(), ' bnc#1246', "url14");
247+
# is((shift @urls)->get_text(), ' gh#os-autoinst/openQA#1234', "url15");
248+
# is((shift @urls)->get_text(), ' gh#os-autoinst/os-autoinst#960', "url16");
249+
# is((shift @urls)->get_text(), ' bgo#768954', "url17");
250+
# is((shift @urls)->get_text(), ' brc#1401123', "url18");
251+
# is((shift @urls)->get_text(), ' bgo#690345', "url19");
252+
# is((shift @urls)->get_text(), ' brc#343098', "url20");
253+
# is((shift @urls)->get_text(), 'bsc#1043970', "url21");
254+
255+
# my @urls2 = $driver->find_elements('div.media-comment a', 'css');
256+
# like((shift @urls2)->get_attribute('href'), qr|^http://localhost:9562/?$|, "url2-href");
257+
# is((shift @urls2)->get_attribute('href'), 'https://openqa.example.com/tests/181148', "url3-href");
258+
# is((shift @urls2)->get_attribute('href'), 'http://localhost/foo/bar', "url4-href");
259+
# is((shift @urls2)->get_attribute('href'), 'https://bugzilla.suse.com/show_bug.cgi?id=1234', "url5-href");
260+
# is((shift @urls2)->get_attribute('href'), 'https://bugzilla.opensuse.org/show_bug.cgi?id=2345', "url6-href");
261+
# is((shift @urls2)->get_attribute('href'), 'https://progress.opensuse.org/issues/3456', "url7-href");
262+
# like((shift @urls2)->get_attribute('href'), qr{/tests/4567}, "url8-href");
263+
# like((shift @urls2)->get_attribute('href'), qr{/tests/5678/modules/welcome/steps}, "url9-href");
264+
# is((shift @urls2)->get_attribute('href'), 'https://progress.opensuse.org/issues/6789', "url10-href");
265+
# is((shift @urls2)->get_attribute('href'), 'https://bugzilla.suse.com/show_bug.cgi?id=7890', "url11-href");
266+
# is((shift @urls2)->get_attribute('href'), 'https://bugzilla.suse.com/show_bug.cgi?id=1000629', "url12-href");
267+
# is((shift @urls2)->get_attribute('href'), 'https://bugzilla.suse.com/show_bug.cgi?id=1246', "url14-href");
268+
# is((shift @urls2)->get_attribute('href'), 'https://github.com/os-autoinst/openQA/issues/1234', "url15-href");
269+
# is((shift @urls2)->get_attribute('href'), 'https://github.com/os-autoinst/os-autoinst/issues/960', "url16-href");
270+
# is((shift @urls2)->get_attribute('href'), 'https://bugzilla.gnome.org/show_bug.cgi?id=768954', "url17-href");
271+
# is((shift @urls2)->get_attribute('href'), 'https://bugzilla.redhat.com/show_bug.cgi?id=1401123', "url18-href");
272+
# is((shift @urls2)->get_attribute('href'), 'https://bugzilla.gnome.org/show_bug.cgi?id=690345', "url19-href");
273+
# is((shift @urls2)->get_attribute('href'), 'https://bugzilla.redhat.com/show_bug.cgi?id=343098', "url20-href");
274+
# is((shift @urls2)->get_attribute('href'), 'https://bugzilla.suse.com/show_bug.cgi?id=1043970', "url21-href");
275+
# };
276276

277277
subtest 'commenting in test results including labels' => sub {
278278

0 commit comments

Comments
 (0)