summaryrefslogtreecommitdiffstats
path: root/perl_checker.src/test
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-08-11 06:40:17 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-08-11 06:40:17 +0000
commit6dbd5d43552c3b223c32dcacdfb709f91e0ab170 (patch)
tree93ddaaaa6ec85e5d0efd14f4d16a0a49395b5f2c /perl_checker.src/test
parenta80e71db45e49e7cd0923bb7bffdafcef3af7d23 (diff)
downloadperl_checker-6dbd5d43552c3b223c32dcacdfb709f91e0ab170.tar
perl_checker-6dbd5d43552c3b223c32dcacdfb709f91e0ab170.tar.gz
perl_checker-6dbd5d43552c3b223c32dcacdfb709f91e0ab170.tar.bz2
perl_checker-6dbd5d43552c3b223c32dcacdfb709f91e0ab170.tar.xz
perl_checker-6dbd5d43552c3b223c32dcacdfb709f91e0ab170.zip
this case is already handled, only add a test case
Diffstat (limited to 'perl_checker.src/test')
-rw-r--r--perl_checker.src/test/suggest_better.t2
1 files changed, 2 insertions, 0 deletions
diff --git a/perl_checker.src/test/suggest_better.t b/perl_checker.src/test/suggest_better.t
index 247fe6c..8d8cb37 100644
--- a/perl_checker.src/test/suggest_better.t
+++ b/perl_checker.src/test/suggest_better.t
@@ -36,6 +36,8 @@ $o->m0() remove these unneeded parentheses
$o = xxx() if !$o; "$foo = ... if !$foo" can be written "$foo ||= ..."
+$o = xxx() unless $o; "$foo = ... unless $foo" can be written "$foo ||= ..."
+
$_ =~ s/xxx/yyy/ "$_ =~ s/regexp/.../" can be written "s/regexp/.../"
$xxx =~ /^yyy$/ "... =~ /^yyy$/" is better written "... eq 'yyy'"