diff options
author | Eric Wong <e@80x24.org> | 2015-08-27 04:34:01 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2015-08-27 06:04:51 +0000 |
commit | 9a2931759c3dcbd879728b49151aa3f8a641b506 (patch) | |
tree | 001d6823d7d9d143d3494ad8376d624ea1ca6afc /t/view.t | |
parent | e3c3cde22f57bf16bc47c50d8f9ac02416975cd3 (diff) | |
download | public-inbox-9a2931759c3dcbd879728b49151aa3f8a641b506.tar.gz |
These URLs are preferable in case somebody decides to get cute and use a suffix we would've used to prevent others from linking to their message. The common /m/$MESSAGE_ID/ URLs are now 4 characters shorter so may fit better on terminals.
Diffstat (limited to 't/view.t')
-rw-r--r-- | t/view.t | 7 |
1 files changed, 4 insertions, 3 deletions
@@ -44,17 +44,18 @@ EOF my $html = PublicInbox::View::msg_html(undef, $mime); # ghetto tests - like($html, qr!<a\nhref="\.\./m/hello%40!s, "MID link present"); + like($html, qr!<a\nhref="\.\./\.\./m/hello%40!s, "MID link present"); like($html, qr/hello world\b/, "body present"); like($html, qr/> keep this inline/, "short quoted text is inline"); like($html, qr/<a\nid=[^>]+><\/a>> Long and wordy/, "long quoted text is anchored"); # short page - my $pfx = "http://example.com/test/f"; + my $pfx = "../../f/hello%40example.com/"; $mime = Email::MIME->new($s); my $short = PublicInbox::View::msg_html(undef, $mime, $pfx); - like($short, qr!<a\nhref="hello%40!s, "MID link present"); + like($short, qr!<a\nhref="\.\./\.\./f/hello%40example\.com/!s, + "MID link present"); like($short, qr/\n> keep this inline/, "short quoted text is inline"); like($short, qr/<a\nhref="\Q$pfx\E#[^>]+>Long and wordy/, |