Subversion Repositories wimsdev

Rev

Rev 2356 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2356 Rev 12335
Line 1... Line 1...
1 
 
 1 
 
2 
!if $seq_abandon!=$empty
 2 
!if $seq_abandon!=$empty
3 
 !reset seq_abandon
 3 
  !reset seq_abandon
4 
 job=show
 4 
  job=show
5 
 !exit
 5 
  !exit
6 
!endif
 6 
!endif
7 
!if $seq_set!=$empty
 7 
!if $seq_set!=$empty
8 
 !reset seq_set
 8 
  !reset seq_set
9 
 seq_Title=!trim $seq_Title
 9 
  seq_Title=!trim $seq_Title
10 
 !if $seq_Title=$empty
 10 
  !if $seq_Title=$empty
11 
  seq_Title=$wims_name_sequence
 11 
    seq_Title=$wims_name_sequence
12 
 !endif
 12 
  !endif
13 
 seq_description=!singlespace $seq_description
 13 
  seq_description=!singlespace $seq_description
14 
 seq_Title=!singlespace $seq_Title
 14 
  seq_Title=!singlespace $seq_Title
15 
 seq_Title=!char 1 to 50 of $seq_Title
 15 
  seq_Title=!char 1 to 50 of $seq_Title
16 
 seq_description=!char 1 to 1024 of $seq_description
 16 
  seq_description=!char 1 to 1024 of $seq_description
17 
!setdef !set sequence_reverse=$seq_reverse\
 17 
!setdef !set sequence_reverse=$seq_reverse\
18 
!set sequence_Title=$seq_Title\
 18 
!set sequence_Title=$seq_Title\
19 
!set sequence_description=$seq_description\
 19 
!set sequence_description=$seq_description\
20 
!set sequence_open=$seq_open\
 20 
!set sequence_open=$seq_open\
21 
   in wimshome/log/classes/$wims_class/seq/.def
 21 
   in wimshome/log/classes/$wims_class/seq/.def
22 
!else
 22 
!else
23 
 !for k in Title,description,reverse,open
 23 
  !for k in Title,description,reverse,open
24 
  seq_$k=$(sequence_$k)
 24 
    seq_$k=$(sequence_$k)
25 
 !next k
 25 
  !next k
26 
!endif
 26 
!endif