Rev 8408 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 8408 | Rev 8409 | ||
---|---|---|---|
Line 13... | Line 13... | ||
13 | !set ppm=!item 3 to -1 of $parms |
13 | !set ppm=!item 3 to -1 of $parms |
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 | !if copy isin $ppm or imagefill isin $ppm or bgimage isin $ppm |
- | |
- | 18 | ||
19 |
|
19 | !read canvasimagedir.phtml $ppm |
20 | !for l_=1 to $line_cnt |
- | |
21 |
|
20 | !set ppm=$canvas_ppm |
22 | !if copy isin $line or imagefill isin $line or bgimage isin $line |
- | |
23 | !set im=!item -1 of $line |
- | |
24 | !if bgimage isin $line |
- | |
25 | !set im=!word -1 of $im |
- | |
26 | !set line=bgimage \filedir/$im |
- | |
27 | !else |
- | |
28 | line=$(line[1..-2]),\filedir/$im |
- | |
29 | !endif |
- | |
30 | !if / notin $im |
- | |
31 | !set ppm=!replace line number $l_ by $line in $ppm |
- | |
32 | !endif |
- | |
33 | !endif |
- | |
34 | !next |
- | |
35 | !endif |
- | |
36 | 21 | ||
37 | !for pm in ppm, sx, sy |
22 | !for pm in ppm, sx, sy |
38 | !set $pm=!slashsubst $($pm) |
23 | !set $pm=!slashsubst $($pm) |
39 | !next pp |
24 | !next pp |
40 | 25 |