Skip to content

Commit

Permalink
delete PERLPOD_POD2 effect
Browse files Browse the repository at this point in the history
  • Loading branch information
joaquinferrero committed Nov 4, 2012
1 parent 7f80282 commit aa2f0f6
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions tools/compare_pods.sh
Expand Up @@ -30,13 +30,13 @@ test -f source/$POD && test -f target/$POD || exit 3


### Format pod with MANWIDTH width ### Format pod with MANWIDTH width
MEDIO=$[$COLS/2-5] MEDIO=$[$COLS/2-5]
MANWIDTH=$MEDIO perldoc -d $POD.en source/$POD MANWIDTH=$MEDIO PERLDOC_POD2="" perldoc -d $POD.en source/$POD


### This encoding line is required because target/ pods ### This encoding line is required because target/ pods
# don't go through the postprocess program, yet # don't go through the postprocess program, yet
echo -e "=encoding utf-8\n\n" > $POD.es.org echo -e "=encoding utf-8\n\n" > $POD.es.org
cat target/$POD >> $POD.es.org cat target/$POD >> $POD.es.org
MANWIDTH=$MEDIO perldoc -d $POD.es $POD.es.org MANWIDTH=$MEDIO PERLDOC_POD2="" perldoc -d $POD.es $POD.es.org


### Show side-by-side ### Show side-by-side
diff -y -W $COLS $POD.{en,es} |less diff -y -W $COLS $POD.{en,es} |less
Expand Down

0 comments on commit aa2f0f6

Please sign in to comment.