diff --git a/.gitattributes b/.gitattributes
index a3a52d9210e4f7e9a2be0abd4a93d99801559c2e..ecf252453d9f9d176c447e46842cb95cb4e1fa0a 100644
--- a/.gitattributes
+++ b/.gitattributes
@@ -35,6 +35,7 @@ testfont binary
 /lib/modules/Crypto/des_cbc.pike foreign_ident
 /lib/modules/Crypto/idea_cbc.pike foreign_ident
 /lib/modules/Crypto/rsa.pike foreign_ident
+/lib/modules/Filesystem.pmod/Tar.pmod foreign_ident
 /lib/modules/LR.pmod/Grammar_parser.pmod foreign_ident
 /lib/modules/LR.pmod/item.pike foreign_ident
 /lib/modules/LR.pmod/lr.pike foreign_ident
diff --git a/lib/modules/Filesystem.pmod/Tar.pmod b/lib/modules/Filesystem.pmod/Tar.pmod
index 2c0fbd874ea8e787bb218e3e747ce835eb7ca186..c89997790f84aa8b8251027a45a3a2c686f3034f 100644
--- a/lib/modules/Filesystem.pmod/Tar.pmod
+++ b/lib/modules/Filesystem.pmod/Tar.pmod
@@ -1,4 +1,4 @@
-
+// $Id: Tar.pmod,v 1.3 1999/07/24 20:18:10 sigge Exp $
 
 class _Tar  // filesystem
 {
@@ -224,7 +224,7 @@ class _TarFS
 
    array(string) get_dir(void|string directory,void|string|array globz)
    {
-      directory=directory?combine_path(wd,directory):wd;
+      directory=combine_path(wd,(directory||""),"");
 
       array f=glob(root+directory+"?*",tar->filenames);
       f-=glob(root+directory+"*/*",f); // stay here