瀏覽代碼

Avoid deleting .cvsignore

tags/v0.9.3
Michael Brown 19 年之前
父節點
當前提交
6e4888400c
共有 1 個檔案被更改,包括 2 行新增2 行删除
  1. 2
    2
      src/util/mkconfig.pl

+ 2
- 2
src/util/mkconfig.pl 查看文件

@@ -48,13 +48,13 @@ sub file_mtime {
48 48
   return $stat->mtime;
49 49
 }
50 50
 
51
-# Read a directory listing (excluding the . and .. entries)
51
+# Read all the .h files in a directory
52 52
 #
53 53
 sub read_dir {
54 54
   my $dir = shift;
55 55
 
56 56
   opendir my $dh, $dir or die "Could not open directory $dir: $!\n";
57
-  my @entries = grep { ! /^(\.)+$/ } readdir $dh;
57
+  my @entries = grep { /\.h$/ } readdir $dh;
58 58
   closedir $dh;
59 59
   return @entries;
60 60
 }

Loading…
取消
儲存