New helper function: crop_text

2008-11-26 04:50:03 +01:00 · 2008-11-26 04:50:03 +01:00 · 41940806db
commit 41940806db
parent 5eee46892e
1 changed files with 14 additions and 0 deletions
--- a/bin/cgilib.rc
+++ b/bin/cgilib.rc
@ -94,6 +94,20 @@ BEGIN {
 '
 }

+fn crop_text {
+    max_chars = $0
+    awk -v max'='^$max_chars^' ' '
+    {
+        nc += 1 + length;
+        if(nc > max) {
+            print substr($0, 1, nc - max) "..."
+            exit
+        }
+        print
+    }' 
+}
+
+
 # Cookies
 fn set_cookie {
    # TODO: should check input values more carefully