From 34d644ff66e9a24d41f4c666c39d6c25fdd04f20 Mon Sep 17 00:00:00 2001
From: zimoch <zimoch>
Date: Wed, 4 May 2011 12:22:05 +0000
Subject: [PATCH] *** empty log message ***

---
 externalLinks | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/externalLinks b/externalLinks
index 16a96e9..7a223df 100755
--- a/externalLinks
+++ b/externalLinks
@@ -4,8 +4,8 @@
 
 version () {
     echo '$Author: zimoch $' >&2
-    echo '$Date: 2011/03/28 13:54:55 $' >&2
-    echo '$Revision: 1.7 $' >&2
+    echo '$Date: 2011/05/04 12:22:05 $' >&2
+    echo '$Revision: 1.8 $' >&2
     echo '$Source: /cvs/G/EPICS/App/scripts/externalLinks,v $' >&2
     exit 1
 }
@@ -342,8 +342,8 @@ function expandFile () {
             }
         }
         if (length(record)>maxNameLen) {
-            printf("record name \"%s\" too long (max %d)\n",
-                record, maxNameLen) > "/dev/stderr"
+            printf("record name \"%s\" %d chars too long (max %d)\n",
+                record, length(record)-maxNameLen, maxNameLen) > "/dev/stderr"
         }
         soft = 1
     }
@@ -413,9 +413,9 @@ function expandFile () {
             }
         } else if (isstring[rtype,field]) {
             if (length(value)>stringsize[rtype,field]) {
-                printf("string \"%s\" in %s.%s (%s) too long (max %d)\n",
+                printf("string \"%s\" in %s.%s (%s) %d chars too long (max %d)\n",
                     value, record, field, rtype,
-                    stringsize[rtype,field]) > "/dev/stderr"
+                    length(value)-stringsize[rtype,field], stringsize[rtype,field]) > "/dev/stderr"
             }
         } else {
             printf("unknown field %s in record %s (%s) should be one of:\n%s\n\n",