1 &version 2
2 &-
3 &- HISTORY COMMENTS:
4 &- 1) change87-07-27GDixon, approve87-07-27MCR7679,
5 &- audit87-07-27Brunelle, install87-08-04MR12.1-1055:
6 &- Created.
7 &- END HISTORY COMMENTS
8 &-
9 &set WDIR &wd
10 cwd &ec_dir
11
12 &print Sort info segments in the directory.
13 l_set_ring_brackets ** 4 5 5
14 create_dir &!
15 move **.info &!>== -force
16 cwd &!
17 move sort_strings -asc segments ** <== -force
18 cwd <
19 delete_dir &! -force
20 l_set_ring_brackets ** 1 5 5
21
22 &print Relink the links in the directory.
23 unlink **.info -brief
24 do "link dir &ec_dir>login_info>&&1.info &&1.info;
25 &+ copy_names dir &ec_dir>login_info>&&1.info &&1.info"
26 &+ hangup access_class echo hello modes noecho terminal_id terminal_type
27 do "link >doc>subsystem>ssu.&&1.info &&1.info;
28 &+ addname &&1.info -brief
29 &+ after status -names >doc>subsystem>ssu.&&1.info ssu."
30 &+ help list_help list_requests
31 cwd &WDIR
32 &quit