From f25804efa335294b633759e19ae8d4964bd9614e Mon Sep 17 00:00:00 2001 From: rbuj Date: Wed, 18 Sep 2019 15:04:25 +0200 Subject: ar: don't remove leading whitespaces in filename field test: $ touch " test" $ touch " test" $ ar r test.a " test" " test" $ ar tv test.a rw-rw-r-- 1000/1001 0 Sep 18 14:58 2019 test rw-rw-r-- 1000/1001 0 Sep 18 14:58 2019 test $ engrampa test.a --- src/fr-command-ar.c | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'src/fr-command-ar.c') diff --git a/src/fr-command-ar.c b/src/fr-command-ar.c index e1397be..af767ca 100644 --- a/src/fr-command-ar.c +++ b/src/fr-command-ar.c @@ -102,15 +102,15 @@ ar_get_last_field (const char *line, while ((field_n > 0) && (*f_end != 0)) { if (*f_end == ' ') { field_n--; - if (field_n != 0) { - while ((*f_end == ' ') && (*f_end != *line)) - f_end++; + if (field_n == 1) f_start = f_end; - } - } else - f_end++; + } + f_end++; } + if (*f_start == ' ') + f_start++; + return g_strdup (f_start); } -- cgit v1.2.1