Skip to content
Browse files

prefer col -bx to colcrt in helpfiles

  • Loading branch information...
1 parent bc160bc commit cf02c2f0f30b56c24a7357043c098f59c25191ee @m0vie m0vie committed with Peter Stephenson Feb 17, 2014
Showing with 8 additions and 6 deletions.
  1. +2 −0 ChangeLog
  2. +6 −6 Util/helpfiles
View
2 ChangeLog
@@ -1,5 +1,7 @@
2014-02-18 Peter Stephenson <p.w.stephenson@ntlworld.com>
+ * m0viefreak: Util/helpfiles: 32402: prefer col -bx to colcrt.
+
* m0viefreak: Util/helpfiles: 32405: Util/helpfiles: remove old
example now shell code is integrated in distribution.
View
12 Util/helpfiles
@@ -67,17 +67,17 @@ if(system('man ' . $args) || !(-s $mantmp)) {
}
$args = "$mantmp >$coltmp";
unlink($coltmp);
-&Info('attempting colcrt - ', $args);
-if(system('colcrt - ' . $args) || !(-s $coltmp)) {
- unlink($coltmp);
- &Info('attempting col -bx <', $args);
+&Info('attempting col -bx <', $args);
# The x is necessary so that spaces don't turn into tabs, which messes
# up the calculations of indentation on machines which randomly wrap lines
# round to the previous line (so you see what we're up against).
- if(system('col -bx <' . $args) || !(-s $coltmp)) {
+if(system('col -bx <' . $args) || !(-s $coltmp)) {
+ unlink($coltmp);
+ &Info('attempting colcrt - ', $args);
+ if(system('colcrt - ' . $args) || !(-s $coltmp)) {
unlink($mantmp);
unlink($coltmp);
- &Die('colcrt and col -bx both failed');
+ &Die('col -bx and colcrt - both failed');
}
}
unlink($mantmp) || &Die('cannot remove tempfile ', $mantmp);

0 comments on commit cf02c2f

Please sign in to comment.
Something went wrong with that request. Please try again.