diff options
| author | Hans Bolinder <[email protected]> | 2013-02-11 16:15:27 +0100 |
|---|---|---|
| committer | Hans Bolinder <[email protected]> | 2013-02-11 16:15:27 +0100 |
| commit | dc1cdb1d12c7198fa46ad88a9632bfc8832aa796 (patch) | |
| tree | 6e9a50eb167bcbec7391e637ecbcb496b9107a04 /lib/stdlib/src/shell.erl | |
| parent | e1676e6c579fa34d07694784afd0902433802bfb (diff) | |
| parent | b333d6f828b396e8174b3a5d2a6d34f91a872d42 (diff) | |
| download | otp-dc1cdb1d12c7198fa46ad88a9632bfc8832aa796.tar.gz otp-dc1cdb1d12c7198fa46ad88a9632bfc8832aa796.tar.bz2 otp-dc1cdb1d12c7198fa46ad88a9632bfc8832aa796.zip | |
Merge branch 'hb/stdlib/unicode_corrections/OTP-10820'
* hb/stdlib/unicode_corrections/OTP-10820:
[stdlib] Fix a bug concerning pretty printing and Unicode
Make Unicode corrections
Diffstat (limited to 'lib/stdlib/src/shell.erl')
| -rw-r--r-- | lib/stdlib/src/shell.erl | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/stdlib/src/shell.erl b/lib/stdlib/src/shell.erl index 0cd408204e..c94f052b24 100644 --- a/lib/stdlib/src/shell.erl +++ b/lib/stdlib/src/shell.erl @@ -950,7 +950,7 @@ local_func(rd, [{atom,_,RecName},RecDef0], Bs, _Shell, RT, _Lf, _Ef) -> RecDef = expand_value(RecDef0), RDs = lists:flatten(erl_pp:expr(RecDef)), Attr = lists:concat(["-record('", RecName, "',", RDs, ")."]), - {ok, Tokens, _} = erl_scan:string(Attr, 1, [unicode]), + {ok, Tokens, _} = erl_scan:string(Attr), case erl_parse:parse_form(Tokens) of {ok,AttrForm} -> [RN] = add_records([AttrForm], Bs, RT), @@ -1397,7 +1397,6 @@ enc() -> garb(Shell) -> erlang:garbage_collect(Shell), catch erlang:garbage_collect(whereis(user)), - catch erlang:garbage_collect(whereis(group)), catch erlang:garbage_collect(group_leader()), erlang:garbage_collect(). |