浏览代码

Fixed a shameful syntax error

Alois Mahdal 12 年前
父节点
当前提交
cf37d1d4be
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1
    1
      lib/htlogr.pm

+ 1
- 1
lib/htlogr.pm 查看文件

@@ -61,7 +61,7 @@ sub data {
61 61
     my $DIV_FIELD =";";
62 62
     my $DIV_VALUE ="=";
63 63
 
64
-    carp("data must be a hash reference" unless ref $data == 'HASH');
64
+    carp("data must be a hash reference") unless ref $data == 'HASH';
65 65
 
66 66
     my @fields;
67 67
     foreach (keys %$data) {