#!perl -w # Copyright (C) all contributors # License: AGPL-3.0+ use v5.12; use PublicInbox::TestCommon; test_lei(sub { ok(!lei('mail-diff', 't/data/0001.patch', 't/data/binary.patch'), 'different messages are different'); like($lei_out, qr/^\+/m, 'diff shown'); unlike $lei_out, qr/No newline at end of file/; lei_ok('mail-diff', 't/data/0001.patch', 't/data/0001.patch'); is($lei_out, '', 'no output if identical'); }); done_testing;