replace `wc -L` with awk script

[muttjump] / muttjump

diff --git a/muttjump b/muttjump
index cd1b0062099eae5bcf685e42f7980ecc772f8415..fc8f3d4692e5f512df5343aa1de850e4204a4ee5 100755 (executable)
--- a/muttjump
+++ b/muttjump
@@ -71,6 +71,10 @@ function is_callable () {
     type $1 >/dev/null 2>&1
 }
 
+function wc_L () {
+    awk '{ y = length(); if (y > x) x = y } END { print x }'
+}
+
 function usage () {
     cat >&2 <<END
 Usage: muttjump msgid
@@ -149,7 +153,7 @@ case $MUTTJUMP_INDEXER in
         # mairix can't quote special characters (~,/=^) in search words. As a
         # workaround, split Message-ID in 31-character long AND-linked
         # substrings.
-        msgid_mairix=$(echo "$msgid_clean" | sed -e 's/[~,/=^]/=,/g' \
+        msgid_mairix=$(echo "$msgid_clean" | sed -e 's/[~,/=^]\+/=,/g' \
             -e 's/.\{31\}/&=,/g' -e 's/^\(=,\)\+//g' -e 's/$/=/' \
             -e 's/\(=,\|=\)\+$/=/g')
         orig_msgfiles=$($MAIRIX -r "m:$msgid_mairix")
@@ -182,7 +186,7 @@ count=$(echo "$orig_msgfiles" | wc -l)
 if [ $count -gt 1 -a -n "$DIALOG_PROG" ] ; then
     choices=$(echo "$orig_msgfiles" | while read line ;
         do dirname "$(dirname "$line")" ; echo . ; done)
-    maxwidth=$(echo "$choices" | wc -L)
+    maxwidth=$(echo "$choices" | wc_L)
     orig_maildir=$($DIALOG_PROG --clear --title "More than one mailbox found" \
         --menu "Select mailbox:" $((count+8)) $((maxwidth+16)) \
         $count $choices 3>&2 2>&1 1>&3-)