Subversion Repositories wimsdev

Rev

Rev 14043 | Blame | Compare with Previous | Last modification | View Log | RSS feed


!if $cf_abandon!=$empty
  !reset cf_abandon
  job=home
  !read home.proc
  !exit
!endif

!if $cf_set!=$empty
  !reset cf_set
  cf_title=!trim $cf_title
  !if $cf_title=$empty
    cf_title=$wims_name_cdt
  !endif
  cf_description=!singlespace $cf_description
  cf_title=!singlespace $cf_title
  cf_title=!char 1 to 50 of $cf_title
  cf_link=!char 1 to 20 of $cf_link
  !bound cf_reversedate between 0 and 1 default $cdt_reversedate
  !bound cf_showyear between 0 and 1 default $cdt_showyear
  !bound cf_hide within yes,no default $cdt_hide
  test=!nospace $cf_link
  !if $test=$empty
    cf_link=$cdt_link
  !endif
  cf_description=!char 1 to 1024 of $cf_description
  !setdef !set cdt_title=$cf_title\
  !set cdt_description=$cf_description\
  !set cdt_link=$cf_link\
  !set cdt_reversedate=$cf_reversedate\
  !set cdt_showyear=$cf_showyear\
  !set cdt_hide=$cf_hide in wimshome/log/classes/$wims_class/cdt/.def
  cdt_description=$cf_description
  cdt_title=$cf_title
  cdt_link=$cf_link
  cdt_reversedate=$cf_reversedate
  cdt_showyear=$cf_showyear
  cdt_hide=$cf_hide
  !if $cdt_showyear=1
    dateoption=$empty
  !else
    dateoption=noyear
  !endif
!else
  !for k in title,description,reversedate,showyear,hide
    cf_$k=$(cdt_$k)
  !next k
  !default cf_reversedate=0
  !default cf_showyear=0
  !default cf_hide=no
!endif