xref: /AOO41X/main/solenv/bin/modules/pre2par/globals.pm (revision 9902b16cdf19d4ec752dbc56d798ac56b5a5e30d)
1#**************************************************************
2#
3#  Licensed to the Apache Software Foundation (ASF) under one
4#  or more contributor license agreements.  See the NOTICE file
5#  distributed with this work for additional information
6#  regarding copyright ownership.  The ASF licenses this file
7#  to you under the Apache License, Version 2.0 (the
8#  "License"); you may not use this file except in compliance
9#  with the License.  You may obtain a copy of the License at
10#
11#    http://www.apache.org/licenses/LICENSE-2.0
12#
13#  Unless required by applicable law or agreed to in writing,
14#  software distributed under the License is distributed on an
15#  "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16#  KIND, either express or implied.  See the License for the
17#  specific language governing permissions and limitations
18#  under the License.
19#
20#**************************************************************
21
22
23
24
25package pre2par::globals;
26
27############################################
28# Global settings
29############################################
30
31BEGIN
32{
33    $prog="pre2par";
34
35    $prefilename = "";
36    $parfilename = "";
37    $langfilename = "";
38
39    @allitems = ("Installation", "ScpAction", "HelpText", "Directory", "DataCarrier", "StarRegistry", "File",
40                 "Shortcut", "Custom", "Unixlink", "Procedure", "Module", "Profile", "ProfileItem",
41                 "Folder", "FolderItem", "RegistryItem", "StarRegistryItem", "WindowsCustomAction");
42
43    $logging     = 0;
44    $logfilename = "logfile.log";   # the default logfile name for global errors
45    @logfileinfo = ();
46
47    $plat = $^O;
48
49    $separator = "/";
50    $pathseparator = "\:";
51    $isunix = 1;
52    $iswin = 0;
53
54    $islinux = 0;
55    $issolaris = 0;
56
57    if ( $plat =~ /linux/i ) { $islinux = 1; }
58    if ( $plat =~ /kfreebsd/i ) { $islinux = 1; }
59    if ( $plat =~ /solaris/i ) { $issolaris = 1; }
60
61}
62
631;
64