From e87bd3a7e7a00df990cce06e6f43badbc3442f55 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 21 Mar 2013 17:12:31 +0000 Subject: merge curl_download into Rpmdrake::edit_urpm_sources rationale: - it's its only user - it has nothing to do with curl since 2008 (and old XS curl code wasn't used anymore since 2003-05-12 when gurpm* stuff was merged in urpmi/gurpm*, grpmi/grpm.pl itself being killed on 2004-01-21) - gc was lazy --- grpmi/Makefile | 37 ------------------------------------ grpmi/curl_download/Makefile | 13 ------------- grpmi/curl_download/Makefile.PL | 9 --------- grpmi/curl_download/curl_download.pm | 24 ----------------------- 4 files changed, 83 deletions(-) delete mode 100644 grpmi/Makefile delete mode 100644 grpmi/curl_download/Makefile delete mode 100755 grpmi/curl_download/Makefile.PL delete mode 100644 grpmi/curl_download/curl_download.pm (limited to 'grpmi') diff --git a/grpmi/Makefile b/grpmi/Makefile deleted file mode 100644 index 29be902e..00000000 --- a/grpmi/Makefile +++ /dev/null @@ -1,37 +0,0 @@ - #****************************************************************************** - # - # Guillaume Cottenceau (gc@mandrakesoft.com) - # - # Copyright 2002 MandrakeSoft - # - # This software may be freely redistributed under the terms of the GNU - # public license. - # - # You should have received a copy of the GNU General Public License - # along with this program; if not, write to the Free Software - # Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. - # - #***************************************************************************** - -DIRS = curl_download - -PREFIX = /usr/local -DATADIR = $(PREFIX)/share -SBINDIR = $(PREFIX)/sbin - -all: dirs - -dirs: - @for n in . $(DIRS); do \ - [ "$$n" = "." ] || make -C $$n || exit 1 ;\ - done - -install: $(ALL) - @for n in $(DIRS); do \ - (cd $$n; $(MAKE) install) \ - done - -clean: - @for n in $(DIRS); do \ - (cd $$n; make clean) \ - done diff --git a/grpmi/curl_download/Makefile b/grpmi/curl_download/Makefile deleted file mode 100644 index 363ad0af..00000000 --- a/grpmi/curl_download/Makefile +++ /dev/null @@ -1,13 +0,0 @@ -.PHONY: clean - -curl_download: - test -e Makefile_c || perl Makefile.PL - $(MAKE) -f Makefile_c - -install: - test -e Makefile_c || perl Makefile.PL - $(MAKE) -f Makefile_c install - -clean: - test ! -e Makefile_c || $(MAKE) -f Makefile_c clean - rm -f *~ *.o diff --git a/grpmi/curl_download/Makefile.PL b/grpmi/curl_download/Makefile.PL deleted file mode 100755 index 9bb1eebe..00000000 --- a/grpmi/curl_download/Makefile.PL +++ /dev/null @@ -1,9 +0,0 @@ -use ExtUtils::MakeMaker; - -WriteMakefile( - 'NAME' => 'curl_download', - 'INSTALLDIRS' => 'vendor', - 'VERSION_FROM' => 'curl_download.pm', # finds VERSION - 'INC' => '-I.', - 'MAKEFILE' => 'Makefile_c', -); diff --git a/grpmi/curl_download/curl_download.pm b/grpmi/curl_download/curl_download.pm deleted file mode 100644 index 034df5f6..00000000 --- a/grpmi/curl_download/curl_download.pm +++ /dev/null @@ -1,24 +0,0 @@ -package curl_download; - -use strict; -use urpm::download; - -our $VERSION = '1.2'; - -sub readproxy (;$) { - my $proxy = get_proxy($_[0]); - ($proxy->{http_proxy} || $proxy->{ftp_proxy} || '', - defined $proxy->{user} ? "$proxy->{user}:$proxy->{pwd}" : ''); -} - -sub writeproxy { - my ($proxy, $proxy_user, $o_media_name) = @_; - my ($user, $pwd) = split /:/, $proxy_user; - set_proxy_config(user => $user, $o_media_name); - set_proxy_config(pwd => $pwd, $o_media_name); - set_proxy_config(http_proxy => $proxy, $o_media_name); - set_proxy_config(ftp_proxy => $proxy, $o_media_name); - dump_proxy_config(); -} - -1; -- cgit v1.2.1