===================================================================
RCS file: /cvs/wpscripts/zlist/zlist,v
retrieving revision 1.4
retrieving revision 1.5
diff -u -r1.4 -r1.5
--- wpscripts/zlist/zlist	2011/07/19 17:02:54	1.4
+++ wpscripts/zlist/zlist	2011/07/19 20:23:44	1.5
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-# $Id: zlist,v 1.4 2011/07/19 17:02:54 yason Exp $
+# $Id: zlist,v 1.5 2011/07/19 20:23:44 yason Exp $
 use DBI;
 use Term::ANSIColor qw(:constants);
 use Time::HiRes qw(gettimeofday tv_interval);
@@ -150,10 +150,6 @@
 	    $searchpath = '/mnt/maket/' . $searchpath;
 
 
-    	    
-#	    # follow symlink to achieve real path
-#	    chomp( $_ = `dirname $searchpath | xargs /usr/bin/readlink` ); chomp( $searchpath = $_ . '/' . `basename $searchpath` );
-	    
 	    # finally, get file size
 	    $size[$i] = -s $searchpath;
 	    $size[$i] = ($size[$i] > 1048576 ? int($size[$i] / 1024 / 1024) . " MB" : int($size[$i] / 1024) . " KB");