mirror of
https://github.com/koalaman/shellcheck
synced 2025-07-13 00:23:20 -07:00
Make it slightly lazier still (and more clear)
This commit is contained in:
parent
5084ba8d7e
commit
cd38afce26
1 changed files with 1 additions and 1 deletions
|
@ -968,7 +968,7 @@ checkCatastrophicRm = CommandCheck (Basename "rm") $ \t ->
|
|||
stripTrailing c = reverse . dropWhile (== c) . reverse
|
||||
skipRepeating c = foldr go []
|
||||
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 = [
|
||||
"", "/bin", "/etc", "/home", "/mnt", "/usr", "/usr/share", "/usr/local",
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue