rpmsafe: +realpath

[nethome.git] / bin / rpmsafe

diff --git a/bin/rpmsafe b/bin/rpmsafe
index 54f771e..f8071da 100755 (executable)
--- a/bin/rpmsafe
+++ b/bin/rpmsafe
@@ -1,2 +1,2 @@
 #! /bin/bash
-rpm -Vva 2>/dev/null|perl -ne 'BEGIN{use Cwd qw(realpath);}print if s/^[.]{7}[.T][.]  [^g] //;'
+rpm -Vva 2>/dev/null|perl -ne 'BEGIN{use Cwd qw(realpath);}chomp;print realpath($_)."\n" if s/^[.]{7}[.T][.]  [^g] //;'