Rev 10627 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
!!extlink.proc :
!! Adds External links in wims_rm_0 for navigation menus
!goto $wims_read_parm
:cnt
!set class_ent1=!rows2lines $class_ent
!set class_ent_n0=!linecnt $class_ent1
!exit
:proc
!if $class_ent_n0>0
!for i_=1 to $class_ent_n0
!set 1_=!line $i_ of $class_ent1
!set wims_rm_0 = !append line $(1_[1]),2,$(1_[2]),external\
to $wims_rm_0
!next i_
!endif