git.marmaro.de Git - mmh/blob - test/tests/mhl/test-mhl-flags

   1 #!/bin/sh
   2 #
   3 # Test of various (well, start with one) function escapes.
   4
   5 . "$MH_TEST_COMMON"
   6
   7
   8
   9 cat >`mhpath b` <<EOF
  10 MIME-Version: 1.0
  11 From: sender@example.com
  12 To: recipient@example.com
  13 Subject: message with blank lines and trailing spaces
  14 Date: Mon, 29 Apr 2013 11:51:45 -0400
  15
  16 There are two blank lines below.  And there is a trailing space:
  17 And another trailing space:
  18
  19
  20 EOF
  21
  22
  23 # check nortrim (default), and that trailing whitespace in a
  24 # component is trimmed when filtering blank lines
  25
  26 cat >"$MH_TEST_DIR/test.format" <<EOF
  27 body:component="> "
  28 EOF
  29
  30 runandcheck "mhl -form $MH_TEST_DIR/test.format `mhpath l`" <<!
  31 > There are two blank lines below.  And there is a trailing space:
  32 > And another trailing space:
  33 >
  34 >
  35 !
  36
  37
  38
  39 # check rtrim
  40
  41 cat >"$MH_TEST_DIR/test.format" <<EOF
  42 body:component="> ",rtrim
  43 EOF
  44
  45 runandcheck "mhl -form $MH_TEST_DIR/test.format `mhpath l`" <<!
  46 > There are two blank lines below.  And there is a trailing space:
  47 > And another trailing space:
  48 >
  49 >
  50 !
  51
  52
  53 rm -f "$MH_TEST_DIR/test.format"
  54