diff options
| author | Björn Gustavsson <[email protected]> | 2013-02-13 07:39:06 +0100 |
|---|---|---|
| committer | Björn Gustavsson <[email protected]> | 2013-02-13 11:58:45 +0100 |
| commit | 5abcc77292e59a951e5a53c1641081f973d25c90 (patch) | |
| tree | 5d53b4b71c47f5f46213f43fdc10fe59bccd3b78 | |
| parent | 7d22cccf18dd44507ee072315036d5023d09d47a (diff) | |
| download | otp-5abcc77292e59a951e5a53c1641081f973d25c90.tar.gz otp-5abcc77292e59a951e5a53c1641081f973d25c90.tar.bz2 otp-5abcc77292e59a951e5a53c1641081f973d25c90.zip | |
Remove special case handling "-" at the beginning of a charset
We don't need this special case, since "-" is only special between
two other characters.
| -rw-r--r-- | lib/stdlib/src/filelib.erl | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/lib/stdlib/src/filelib.erl b/lib/stdlib/src/filelib.erl index 93e700284c..7df72a93e5 100644 --- a/lib/stdlib/src/filelib.erl +++ b/lib/stdlib/src/filelib.erl @@ -447,8 +447,6 @@ compile_part([], _Upto, Result) -> compile_charset([$]|Rest], Ordset) -> compile_charset1(Rest, ordsets:add_element($], Ordset)); -compile_charset([$-|Rest], Ordset) -> - compile_charset1(Rest, ordsets:add_element($-, Ordset)); compile_charset([], _Ordset) -> error; compile_charset(List, Ordset) -> |