Subversion Repositories wimsdev

Rev

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

Rev 8404 Rev 8407
Line 14... Line 14...
14
!endif
14
!endif
15
 
15
 
16
!set ppm=!replace internal $    $ by $\
16
!set ppm=!replace internal $    $ by $\
17
$ in $ppm
17
$ in $ppm
18
 
18
 
19
!if copy isin $ppm
19
!if copy isin $ppm or imagefill isin $ppm
20
  !set line_cnt=!linecnt $ppm
20
  !set line_cnt=!linecnt $ppm
21
  !for l_=1 to $line_cnt
21
  !for l_=1 to $line_cnt
22
    !set line=!line $l_ of $ppm
22
    !set line=!line $l_ of $ppm
23
    !if copy isin $line
23
    !if copy isin $line or imagefill isin $line
24
      !set im=!item -1 of $line
24
      !set im=!item -1 of $line
25
      !if / notin $im
25
      !if / notin $im
26
        !set ppm=!replace line number $l_ by $(line[1..-2]),\filedir/$im in $ppm
26
        !set ppm=!replace line number $l_ by $(line[1..-2]),\filedir/$im in $ppm
27
      !endif
27
      !endif
28
    !endif
28
    !endif