diff --git a/collects/mred/edit.ss b/collects/mred/edit.ss index f05e9180..a1d220a4 100644 --- a/collects/mred/edit.ss +++ b/collects/mred/edit.ss @@ -1,12 +1,12 @@ (define mred:edit@ (unit/sig mred:edit^ - (import ([unit mred:debug : mred:debug^] - [unit mred:finder : mred:finder^] - [unit mred:path-utils : mred:path-utils^] - [unit mred:mode : mred:mode^] - [unit mred:scheme-paren : mred:scheme-paren^] - [unit mred:keymap : mred:keymap^] - [unit mzlib:function : mzlib:function^])) + (import [mred:debug : mred:debug^] + [mred:finder : mred:finder^] + [mred:path-utils : mred:path-utils^] + [mred:mode : mred:mode^] + [mred:scheme-paren : mred:scheme-paren^] + [mred:keymap : mred:keymap^] + [mzlib:function : mzlib:function^]) (mred:debug:printf 'invoke "mred:edit@") diff --git a/collects/mred/exit.ss b/collects/mred/exit.ss index 8e611e28..e029c420 100644 --- a/collects/mred/exit.ss +++ b/collects/mred/exit.ss @@ -1,6 +1,6 @@ (define mred:exit@ (unit/sig mred:exit^ - (import ([unit mred:debug : mred:debug^])) + (import [mred:debug : mred:debug^]) (rename (-exit exit)) (mred:debug:printf 'invoke "mred:exit@") diff --git a/collects/mred/finder.ss b/collects/mred/finder.ss index b836e10e..d7e726ea 100644 --- a/collects/mred/finder.ss +++ b/collects/mred/finder.ss @@ -1,9 +1,9 @@ (define mred:finder@ (unit/sig mred:finder^ - (import ([unit mred:debug : mred:debug^] - [unit mzlib:string : mzlib:string^] - [unit mzlib:function : mzlib:function^] - [unit mzlib:file : mzlib:file^])) + (import [mred:debug : mred:debug^] + [mzlib:string : mzlib:string^] + [mzlib:function : mzlib:function^] + [mzlib:file : mzlib:file^]) (mred:debug:printf 'invoke "mred:finder@") diff --git a/collects/mred/keys.ss b/collects/mred/keys.ss index bfed8ef7..d0f1c0d3 100644 --- a/collects/mred/keys.ss +++ b/collects/mred/keys.ss @@ -1,10 +1,10 @@ (define mred:keymap@ (unit/sig mred:keymap^ - (import ([unit mred:debug : mred:debug^] - [unit mred:finder : mred:finder^] - [unit mred:handler : mred:handler^] - [unit mred:find-string : mred:find-string^] - [unit mred:scheme-paren : mred:scheme-paren^])) + (import [mred:debug : mred:debug^] + [mred:finder : mred:finder^] + [mred:handler : mred:handler^] + [mred:find-string : mred:find-string^] + [mred:scheme-paren : mred:scheme-paren^]) (mred:debug:printf 'invoke "mred:keymap@") diff --git a/collects/mred/prefs.ss b/collects/mred/prefs.ss index 7b3adc00..f238e105 100644 --- a/collects/mred/prefs.ss +++ b/collects/mred/prefs.ss @@ -7,9 +7,9 @@ (define mred:preferences@ (unit/sig mred:preferences^ - (import ([unit mred:debug : mred:debug^] - [unit mred:exn : mred:exn^] - [unit mzlib:function : mzlib:function^])) + (import [mred:debug : mred:debug^] + [mred:exn : mred:exn^] + [mzlib:function : mzlib:function^]) (mred:debug:printf 'invoke "mred:preferences@")