From 2b400a5a976ff2898e81377cf0a15c375853d78c Mon Sep 17 00:00:00 2001
From: unknown <arjen@fred.bitbike.com>
Date: Thu, 14 Mar 2002 15:35:00 +1000
Subject: [PATCH] Append "cm" measurement unit specifier to colwidth field.

---
 Docs/Support/colspec-fix.pl | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/Docs/Support/colspec-fix.pl b/Docs/Support/colspec-fix.pl
index 48913d6d638..21abb90fef9 100755
--- a/Docs/Support/colspec-fix.pl
+++ b/Docs/Support/colspec-fix.pl
@@ -4,6 +4,8 @@
 # Script to rewrite colspecs from relative values to absolute values
 #
 
+# arjen 2002-03-14 append "cm" specifier to colwidth field.
+
 use strict;
 
 my $table_width  = 12.75;   # cm
@@ -43,7 +45,7 @@ sub rel2abs {
     my $unit = ($table_width - ($#widths * $gutter_width)) / ($total);
 
     foreach (@widths) {
-        $output .= $ws . '<colspec colwidth="'. sprintf ("%0.2f", $_ * $unit) .'" />' . "\n";
+        $output .= $ws . '<colspec colwidth="'. sprintf ("%0.2f", $_ * $unit) .'cm" />' . "\n";
     }
     
     return $output . "\n$ws";