File: LoadPetal.pm

package info (click to toggle)
libpetal-utils-perl 0.06-5
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 384 kB
  • sloc: perl: 935; makefile: 2
file content (18 lines) | stat: -rw-r--r-- 375 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
# Common code for loading Petal with default dir

# load things into the caller's package

use Petal;
use File::Spec;

my $base_dir = File::Spec->catdir(qw( t data ));

# Petal's global settings
$Petal::DISK_CACHE   = 0;
$Petal::MEMORY_CACHE = 0;
$Petal::TAINT        = 1;
$Petal::BASE_DIR     = $base_dir;
$Petal::INPUT        = "XHTML";
$Petal::OUTPUT       = "XHTML";

1;