*** tar-0.4.tm	2009-04-16 08:03:27.000000000 +0200
--- tar-0.4.tm.orig	2009-04-16 07:56:11.000000000 +0200
***************
*** 4,6 ****
  # @@ Meta Begin
! # Package tar 0.4.1
  # Meta as::build::date 2009-04-12
--- 4,6 ----
  # @@ Meta Begin
! # Package tar 0.4
  # Meta as::build::date 2009-04-12
*************** proc ::tar::readHeader {data} {
*** 93,95 ****
  proc ::tar::contents {file} {
-     set ret {}
      set fh [::open $file]
--- 93,94 ----
*************** proc ::tar::contents {file} {
*** 106,108 ****
  proc ::tar::stat {tar {file {}}} {
-     set ret {}
      set fh [::open $tar]
--- 105,106 ----
