aboutsummaryrefslogtreecommitdiffstats
path: root/awklib/eg/prog/cut.awk
diff options
context:
space:
mode:
authorArnold D. Robbins <arnold@skeeve.com>2014-07-12 23:20:39 -0700
committerArnold D. Robbins <arnold@skeeve.com>2014-07-12 23:20:39 -0700
commitde3372f0d98c7137823e7d5630d03429bb77d1f2 (patch)
tree389fa3f5f107b3ca1178e6d7a65e66ff3644e29c /awklib/eg/prog/cut.awk
parentebb6772e9eabeb81e3cc9305a6bec7adf7aad450 (diff)
parentdf2eaea6a92c7d89d604d0a4e885d064678ce3ed (diff)
downloadegawk-de3372f0d98c7137823e7d5630d03429bb77d1f2.tar.gz
egawk-de3372f0d98c7137823e7d5630d03429bb77d1f2.tar.bz2
egawk-de3372f0d98c7137823e7d5630d03429bb77d1f2.zip
Merge branch 'master' into comment
Diffstat (limited to 'awklib/eg/prog/cut.awk')
-rw-r--r--awklib/eg/prog/cut.awk8
1 files changed, 4 insertions, 4 deletions
diff --git a/awklib/eg/prog/cut.awk b/awklib/eg/prog/cut.awk
index 1399411e..04d9bc11 100644
--- a/awklib/eg/prog/cut.awk
+++ b/awklib/eg/prog/cut.awk
@@ -34,7 +34,7 @@ BEGIN \
OFS = ""
} else if (c == "d") {
if (length(Optarg) > 1) {
- printf("Using first character of %s" \
+ printf("cut: using first character of %s" \
" for delimiter\n", Optarg) > "/dev/stderr"
Optarg = substr(Optarg, 1, 1)
}
@@ -43,7 +43,7 @@ BEGIN \
if (FS == " ") # defeat awk semantics
FS = "[ ]"
} else if (c == "s")
- suppress++
+ suppress = 1
else
usage()
}
@@ -75,7 +75,7 @@ function set_fieldlist( n, m, i, j, k, f, g)
if (index(f[i], "-") != 0) { # a range
m = split(f[i], g, "-")
if (m != 2 || g[1] >= g[2]) {
- printf("bad field list: %s\n",
+ printf("cut: bad field list: %s\n",
f[i]) > "/dev/stderr"
exit 1
}
@@ -96,7 +96,7 @@ function set_charlist( field, i, j, f, g, n, m, t,
if (index(f[i], "-") != 0) { # range
m = split(f[i], g, "-")
if (m != 2 || g[1] >= g[2]) {
- printf("bad character list: %s\n",
+ printf("cut: bad character list: %s\n",
f[i]) > "/dev/stderr"
exit 1
}