mirror of https://github.com/leahneukirchen/mblaze
You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
167 lines
2.9 KiB
Bash
167 lines
2.9 KiB
Bash
#!/bin/sh -e
|
|
cd ${0%/*}
|
|
. ./lib.sh
|
|
plan 12
|
|
|
|
rm -rf test.dir
|
|
mkdir test.dir
|
|
(
|
|
cd test.dir
|
|
|
|
export PIPE_CONTENTTYPE='text/plain; format=flowed'
|
|
export COLUMNS=80
|
|
|
|
cat <<! >a
|
|
this
|
|
is
|
|
flowed.
|
|
!
|
|
cat <<! >b
|
|
this is flowed.
|
|
!
|
|
check 'simple reflow' 'mflow <a | cmp - b'
|
|
|
|
cat <<! >a
|
|
this
|
|
is
|
|
two spaces.
|
|
!
|
|
cat <<! >b
|
|
this is two spaces.
|
|
!
|
|
check 'simple space stuffing' 'mflow <a | cmp - b'
|
|
|
|
cat <<! >a
|
|
this
|
|
is
|
|
flowed.
|
|
this is fixed.
|
|
!
|
|
cat <<! >b
|
|
this is flowed.
|
|
this is fixed.
|
|
!
|
|
check 'simple fixed' 'mflow <a | cmp - b'
|
|
|
|
cat <<! >a
|
|
> this
|
|
> is
|
|
> quoted.
|
|
this
|
|
is
|
|
unquoted.
|
|
!
|
|
cat <<! >b
|
|
> this is quoted.
|
|
this is unquoted.
|
|
!
|
|
check 'simple quoted' 'mflow <a | cmp - b'
|
|
|
|
(
|
|
export PIPE_CONTENTTYPE='text/plain; format=flowed; delsp=yes'
|
|
|
|
cat <<! >a
|
|
> this
|
|
> is
|
|
> delsp.
|
|
|
|
> double
|
|
> spaced
|
|
!
|
|
cat <<! >b
|
|
> thisisdelsp.
|
|
|
|
> double spaced
|
|
!
|
|
check 'simple delsp' 'mflow <a | cmp - b'
|
|
)
|
|
|
|
cat <<! >a
|
|
this
|
|
is
|
|
way more than eighty chars which is the terminal width to flow.
|
|
this
|
|
is
|
|
way more than eighty chars which is the terminal width to flow.
|
|
!
|
|
cat <<! >b
|
|
this is way more than eighty chars which is the terminal width to flow. this is
|
|
way more than eighty chars which is the terminal width to flow.
|
|
!
|
|
check 'simple wrap' 'mflow <a | cmp - b'
|
|
|
|
cat <<! >a
|
|
this
|
|
is
|
|
way more than eighty chars which is the terminal width to flow.
|
|
averylongwordcomeshere.
|
|
this
|
|
is
|
|
way more than eighty chars which is the terminal width to flow.
|
|
!
|
|
cat <<! >b
|
|
this is way more than eighty chars which is the terminal width to flow.
|
|
averylongwordcomeshere. this is way more than eighty chars which is the
|
|
terminal width to flow.
|
|
!
|
|
check 'more complex wrap' 'mflow <a | cmp - b'
|
|
|
|
cat <<! >a
|
|
foo
|
|
bar.
|
|
|
|
quux.
|
|
!
|
|
cat <<! >b
|
|
foo bar.
|
|
|
|
quux.
|
|
!
|
|
check 'space before empty line' 'mflow <a | cmp - b'
|
|
|
|
cat <<! >a
|
|
Aaaaa bbbbb ccccc ddddd eeeee aaaaa bbbbb ccccc ddddd eeeee
|
|
aaaaa bbbbb ccccc ddddd eeeee aaaaa bbbbb ccccc ddddd eeeee
|
|
aaaaa bbbbb ccccc
|
|
ffffff gggggg hhhhhh iiiiii.
|
|
!
|
|
cat <<! >b
|
|
Aaaaa bbbbb ccccc ddddd eeeee aaaaa bbbbb ccccc ddddd eeeee aaaaa bbbbb ccccc
|
|
ddddd eeeee aaaaa bbbbb ccccc ddddd eeeee aaaaa bbbbb ccccc ffffff gggggg
|
|
hhhhhh iiiiii.
|
|
!
|
|
check 'fixed lines are wrapped too' 'mflow <a | cmp - b'
|
|
|
|
cat <<! >a
|
|
some
|
|
wrapped.
|
|
--
|
|
signature
|
|
!
|
|
cat <<! >b
|
|
some wrapped.
|
|
--
|
|
signature
|
|
!
|
|
check 'passes usenet signature marker as is' 'mflow <a | cmp - b'
|
|
|
|
cat <<! >a
|
|
some regular text being force wrapped because the line is way too long oh no who writes so long lines.
|
|
!
|
|
cat <<! >b
|
|
some regular text being force wrapped because the line is way too long oh no
|
|
who writes so long lines.
|
|
!
|
|
check 'force wrapping' 'mflow -f <a | cmp - b'
|
|
|
|
cat <<! >a
|
|
> some regular text being force wrapped because the line is way too long oh no who writes so long lines.
|
|
!
|
|
cat <<! >b
|
|
> some regular text being force wrapped because the line is way too long oh no
|
|
> who writes so long lines.
|
|
!
|
|
check 'force wrapping of quoted text' 'mflow -f <a | cmp - b'
|
|
|
|
)
|