print link target in contents

diff --git a/zpm-contents b/zpm-contents
index 7522c183a647f0f8f9ab34647963e3954e2021db..d6a5996ba34846945b7db0b68074f0314e88b84a 100755 (executable)
--- a/zpm-contents
+++ b/zpm-contents
@@ -22,7 +22,7 @@ if [ ! -f $pkgfile ]; then
 fi
 
 if [ $long -gt 0 ]; then
-       cols="filetype,printf('%3.3s', mode) as mode,username,groupname,"
+       cols="filetype,printf('%.4s', mode) as mode,username,groupname,"
 fi
 
 if [ $pkgonly -eq 1 ]; then
@@ -70,6 +70,8 @@ cols=${cols%,}
                cat <<-EOC
                case when filetype = 'd' then
                        rtrim(path,'/') || '/'
+               when filetype = 'l' then
+                       printf('%s -> %s', path, target)
                else
                        path
                end as path