diff options
author | psyc://loupsycedyglgamf.onion/~lynX <ircs://psyced.org/youbroketheinternet> | 2016-08-10 15:28:55 +0000 |
---|---|---|
committer | psyc://loupsycedyglgamf.onion/~lynX <ircs://psyced.org/youbroketheinternet> | 2016-08-10 15:28:55 +0000 |
commit | 25a19f76a99cc8e536fd19b533daea2c32213747 (patch) | |
tree | 7b73392a22ad103d4828855e4f5460e012e2cce5 | |
parent | b04fac63a4996f9749187c46e6369b6c69c12cf9 (diff) | |
download | perlpsyc-25a19f76a99cc8e536fd19b533daea2c32213747.tar.gz perlpsyc-25a19f76a99cc8e536fd19b533daea2c32213747.zip |
stupid bug
-rwxr-xr-x | bin/psycamp | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/bin/psycamp b/bin/psycamp index 5e64423..927ed6b 100755 --- a/bin/psycamp +++ b/bin/psycamp | |||
@@ -939,8 +939,7 @@ sub by_s { | |||
939 | my ($bd, $bi) = stat $b; | 939 | my ($bd, $bi) = stat $b; |
940 | # inform of duplicate files in file system | 940 | # inform of duplicate files in file system |
941 | # unless they are hard- or softlinked | 941 | # unless they are hard- or softlinked |
942 | print MAGENTA, <<X, RESET | 942 | print MAGENTA, <<X, RESET unless $ai == $bi and $ad == $bd; |
943 | unless $ai == $bi and $ad == $bd; | ||
944 | Same file size $B: | 943 | Same file size $B: |
945 | $file[$a] and | 944 | $file[$a] and |
946 | $file[$b] | 945 | $file[$b] |