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 >doc>subsystem>ssu.&&1.info &&1.info;
25 &+ addname &&1.info -brief
26 &+ after status -names >doc>subsystem>ssu.&&1.info ssu."
27 &+ answer do execute_string help if list_help list_requests
28 link >doc>info>pause.info
29 do "link >doc>subsystem>ssu.&&1.info &&1.info;
30 &+ addname &&1.info -brief
31 &+ after status -names >doc>subsystem>ssu.&&1.info ssu."
32 &+ quit ready ready_off ready_on substitute_arguments subsystem_name
33 &+ subsystem_version
34 link >doc>info>user.info
35 cwd &WDIR
36 &quit