7x31/shellcheck
1
0
Fork 0
mirror of https://github.com/koalaman/shellcheck.git synced 2025-08-08 22:35:54 +08:00
Code Issues Packages Projects Releases Wiki Activity

Make it slightly lazier still (and more clear)

Browse Source
This commit is contained in:
Joseph C. Sible
2020-04-05 21:45:51 -04:00
parent 5084ba8d7e
commit cd38afce26
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/ShellCheck/Checks/Commands.hs
View File

@@ -968,7 +968,7 @@ checkCatastrophicRm = CommandCheck (Basename "rm") $ \t ->
stripTrailing c = reverse . dropWhile (== c) . reverse stripTrailing c = reverse . dropWhile (== c) . reverse
skipRepeating c = foldr go [] skipRepeating c = foldr go []
where where
go a r = a : if a == c then case r of b:rest | b == c -> rest; _ -> r else r go a r = a : case r of b:rest | b == c && a == b -> rest; _ -> r
paths = [ paths = [
"", "/bin", "/etc", "/home", "/mnt", "/usr", "/usr/share", "/usr/local", "", "/bin", "/etc", "/home", "/mnt", "/usr", "/usr/share", "/usr/local",