summaryrefslogtreecommitdiff
path: root/sc/util
diff options
context:
space:
mode:
authorDavid Tardon <dtardon@redhat.com>2013-04-10 07:08:43 +0200
committerDavid Tardon <dtardon@redhat.com>2013-04-10 14:00:23 +0200
commitd5d69702a5ecfdeb41236ef0ff30397f843b0cb5 (patch)
treebcc327346f9e4a4cee2086a1d59f000efdff1e6a /sc/util
parent0b8859265bf0c6e2fb5e116bd8856ac9ec95e387 (diff)
drop unused script
Change-Id: I892d2856c28536a7828c292c8fb3cd8b30fe8ecb
Diffstat (limited to 'sc/util')
-rw-r--r--sc/util/createExtPackage.pl58
1 files changed, 0 insertions, 58 deletions
diff --git a/sc/util/createExtPackage.pl b/sc/util/createExtPackage.pl
deleted file mode 100644
index b42fc849baa2..000000000000
--- a/sc/util/createExtPackage.pl
+++ /dev/null
@@ -1,58 +0,0 @@
-#
-# This file is part of the LibreOffice project.
-#
-# This Source Code Form is subject to the terms of the Mozilla Public
-# License, v. 2.0. If a copy of the MPL was not distributed with this
-# file, You can obtain one at http://mozilla.org/MPL/2.0/.
-#
-# This file incorporates work covered by the following license notice:
-#
-# Licensed to the Apache Software Foundation (ASF) under one or more
-# contributor license agreements. See the NOTICE file distributed
-# with this work for additional information regarding copyright
-# ownership. The ASF licenses this file to you under the Apache
-# License, Version 2.0 (the "License"); you may not use this file
-# except in compliance with the License. You may obtain a copy of
-# the License at http://www.apache.org/licenses/LICENSE-2.0 .
-#
-
-use Archive::Zip qw(:ERROR_CODES);
-use File::Basename;
-
-my $zipName = shift || die 'must provide a ext name';
-my $rdbName = shift || die 'must provide a types library';
-my $libName = shift || die 'must provide a component library';
-
-die "can't access type library $rdbName" unless -f $rdbName;
-die "can't access component library $libName" unless -f $libName;
-
-# Read the zip
-my $zip = Archive::Zip->new();
-
-if ( -f $zipName )
-{
- # be stupid and recreate zip every time
- # in another iteration lets try to overwrite it instead
- my $result = 0;
- $result = unlink($zipName);
- if ( result != 0 )
- {
- die 'can not delete old extension';
- }
-}
-my $rdb = basename( $rdbName );
-my $lib = basename( $libName );
-
-my $content2 = "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n";
-$content2 .= "<!DOCTYPE manifest:manifest PUBLIC \"-//OpenOffice.org//DTD Manifest 1.0//EN\" \"Manifest.dtd\">\n";
-$content2 .= "<manifest:manifest xmlns:manifest=\"http://openoffice.org/2001/manifest\">\n";
-$content2 .= " <manifest:file-entry manifest:media-type=\"application/vnd.sun.star.uno-typelibrary;type=RDB\" manifest:full-path=\"$rdb\"/>\n";
-$content2 .= " <manifest:file-entry manifest:media-type=\"application/vnd.sun.star.uno-component;type=native\" manifest:full-path=\"$lib\"/>\n";
-$content2 .= "</manifest:manifest>\n";
-
-$zip->addFile( $rdbName, $rdb );
-$zip->addFile( $libName, $lib );
-$zip->addDirectory( "META-INF" );
-$zip->addFile( "META-INF/manifest.xml", "manifest.xml" );
-$zip->addString( $content2, "META-INF/manifest.xml" );
-exit( $zip->writeToFileNamed($zipName) );