From f4401ed56e43f8c71e485850847d2478914c010d Mon Sep 17 00:00:00 2001
From: ianmacd <>
Date: Fri, 10 May 2002 16:09:35 +0000
Subject: [PATCH] - use sed instead of Perl in urpmi completion (patch from
 Guillaume Rousse   <rousse@ccr.jussieu.fr>)

---
 bash_completion | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/bash_completion b/bash_completion
index 4b7dd601..f04d1bbb 100644
--- a/bash_completion
+++ b/bash_completion
@@ -1,6 +1,6 @@
 #   bash_completion - some programmable completion functions for bash 2.05a
 #
-#   $Id: bash_completion,v 1.309 2002/05/09 18:20:53 ianmacd Exp $
+#   $Id: bash_completion,v 1.310 2002/05/10 18:09:35 ianmacd Exp $
 #
 #   Copyright (C) Ian Macdonald <ian@caliban.org>
 #
@@ -2822,7 +2822,7 @@ _urpmi_media()
 {
 	local IFS=$'\t\n'
 	# return list of available urpmi media
-	COMPREPLY=( $( perl -ln -e 'if (m/^(.+) .+ {$/) {print $1}' /etc/urpmi/urpmi.cfg | grep "^${cur//\\\\/\\\\}" ) )
+	COMPREPLY=( $( sed -ne "s/^\(.\+\) \(\(file\|removable\|ftp\|http\):\/\/.*\)\? {$/\1/p" /etc/urpmi/urpmi.cfg | grep "^${cur//\\\\/\\\\}" ) )
 }
 
 # Mandrake urpmi completion