|
Revision 1587, 0.7 kB
(checked in by whmoseley, 4 years ago)
|
Initial revision
|
- Property svn:eol-style set to
native
- Property svn:keywords set to
Author Date Id Revision
|
| Line | |
|---|
| 1 |
[% |
|---|
| 2 |
|
|---|
| 3 |
# Process page, based on the page's type as defined in a META |
|---|
| 4 |
# tag in source page. |
|---|
| 5 |
|
|---|
| 6 |
SWITCH page.type; |
|---|
| 7 |
|
|---|
| 8 |
CASE 'text'; # render as-is. Page is not html |
|---|
| 9 |
content; |
|---|
| 10 |
|
|---|
| 11 |
CASE 'html'; # normal page |
|---|
| 12 |
content WRAPPER page/html.html |
|---|
| 13 |
+ page/layout.html; |
|---|
| 14 |
|
|---|
| 15 |
|
|---|
| 16 |
CASE 'pod'; # format with Pod::POM |
|---|
| 17 |
content WRAPPER page/html.html |
|---|
| 18 |
+ page/layout.html |
|---|
| 19 |
+ page/podpage; |
|---|
| 20 |
|
|---|
| 21 |
|
|---|
| 22 |
CASE 'nolayout'; # html page, but do not make layout |
|---|
| 23 |
content WRAPPER page/html.html; |
|---|
| 24 |
|
|---|
| 25 |
CASE; |
|---|
| 26 |
THROW page.type "Invalid page type: $page.type"; |
|---|
| 27 |
|
|---|
| 28 |
END; |
|---|
| 29 |
-%] |
|---|
