xref: /trunk/main/solenv/bin/modules/pre2par/globals.pm (revision cdf0e10c)
1#*************************************************************************
2#
3# DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4#
5# Copyright 2000, 2010 Oracle and/or its affiliates.
6#
7# OpenOffice.org - a multi-platform office productivity suite
8#
9# This file is part of OpenOffice.org.
10#
11# OpenOffice.org is free software: you can redistribute it and/or modify
12# it under the terms of the GNU Lesser General Public License version 3
13# only, as published by the Free Software Foundation.
14#
15# OpenOffice.org is distributed in the hope that it will be useful,
16# but WITHOUT ANY WARRANTY; without even the implied warranty of
17# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18# GNU Lesser General Public License version 3 for more details
19# (a copy is included in the LICENSE file that accompanied this code).
20#
21# You should have received a copy of the GNU Lesser General Public License
22# version 3 along with OpenOffice.org.  If not, see
23# <http://www.openoffice.org/license.html>
24# for a copy of the LGPLv3 License.
25#
26#*************************************************************************
27
28
29package pre2par::globals;
30
31############################################
32# Global settings
33############################################
34
35BEGIN
36{
37	$prog="pre2par";
38
39	$prefilename = "";
40	$parfilename = "";
41	$langfilename = "";
42
43	@allitems = ("Installation", "ScpAction", "HelpText", "Directory", "DataCarrier", "StarRegistry", "File",
44				 "Shortcut", "Custom", "Unixlink", "Procedure", "Module", "Profile", "ProfileItem",
45				 "Folder", "FolderItem", "RegistryItem", "StarRegistryItem", "WindowsCustomAction",
46				 "MergeModule");
47
48    $logging     = 0;
49	$logfilename = "logfile.log";	# the default logfile name for global errors
50	@logfileinfo = ();
51
52	$plat = $^O;
53
54	$separator = "/";
55	$pathseparator = "\:";
56	$isunix = 1;
57	$iswin = 0;
58
59	$islinux = 0;
60	$issolaris = 0;
61
62	if ( $plat =~ /linux/i ) { $islinux = 1; }
63	if ( $plat =~ /kfreebsd/i ) { $islinux = 1; }
64	if ( $plat =~ /solaris/i ) { $issolaris = 1; }
65
66}
67
681;
69