From a61e4ad8f7462e627e3b2a4ce3fd0e80bc0187a0 Mon Sep 17 00:00:00 2001 From: Ivo Hinkelmann Date: Mon, 20 Aug 2007 14:28:51 +0000 Subject: [PATCH] INTEGRATION: CWS native99 (1.8.4); FILE MERGED 2007/08/07 13:57:54 is 1.8.4.1: #i80411# new scp linker to simplify package restructuring --- solenv/bin/modules/par2script/globals.pm | 23 +++++++++++++++-------- 1 file changed, 15 insertions(+), 8 deletions(-) diff --git a/solenv/bin/modules/par2script/globals.pm b/solenv/bin/modules/par2script/globals.pm index 615744183d83..1784da2c748c 100644 --- a/solenv/bin/modules/par2script/globals.pm +++ b/solenv/bin/modules/par2script/globals.pm @@ -4,9 +4,9 @@ # # $RCSfile: globals.pm,v $ # -# $Revision: 1.8 $ +# $Revision: 1.9 $ # -# last change: $Author: ihi $ $Date: 2007-07-12 11:17:14 $ +# last change: $Author: ihi $ $Date: 2007-08-20 15:28:51 $ # # The Contents of this file are made available subject to # the terms of GNU Lesser General Public License Version 2.1. @@ -49,19 +49,26 @@ BEGIN $parfilelistorig = ""; $parfilelist = ""; - @allitems = ("Installation", "ScpAction", "HelpText", "Directory", "DataCarrier", "StarRegistry", "File", - "Shortcut", "Custom", "Unixlink" ,"Procedure", "Module", "Profile", "ProfileItem", - "Folder", "FolderItem", "RegistryItem", "StarRegistryItem", "WindowsCustomAction"); + @allitems = ("Installation", "ScpAction", "Directory", "File", + "Shortcut", "Unixlink", "Module", "Profile", "ProfileItem", + "Folder", "FolderItem", "RegistryItem", "WindowsCustomAction"); - @items_with_moduleid = ("Profile", "ProfileItem", - "FolderItem", "RegistryItem", "StarRegistryItem"); + @items_assigned_at_modules = ("File", "Directory", "Unixlink"); + @items_with_directories = ("File", "Profile", "Shortcut", "Unixlink"); + @items_with_moduleid = ("Profile", "ProfileItem", "FolderItem", "RegistryItem"); + @items_without_moduleid = ("File", "Directory", "Shortcut", "Unixlink"); + + %searchkeys = ("File" => "Files", "Directory" => "Dirs", "Unixlink" => "Unixlinks"); $logging = 0; $logfilename = "logfile.log"; # the default logfile name for global errors @logfileinfo = (); $multidefinitionerror = 0; - @multidefinitiongids = (); + $multiassignmenterror = 0; + + %definitions; + %assignedgids; $plat = $^O;