From 882c043dc4639ad290708055874082854bd484bb Mon Sep 17 00:00:00 2001
From: Davide Madrisan <davide.madrisan@gmail.com>
Date: Sat, 14 Apr 2012 22:08:51 +0200
Subject: [PATCH] pck-update (-a0): fix for the case where regexpr is ".*"

Signed-off-by: Davide Madrisan <davide.madrisan@gmail.com>
---
 lib/libnetwork.lib.in | 11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

diff --git a/lib/libnetwork.lib.in b/lib/libnetwork.lib.in
index 97f1d7b..6290727 100644
--- a/lib/libnetwork.lib.in
+++ b/lib/libnetwork.lib.in
@@ -51,15 +51,14 @@ function repository.get_srpm_pckname_from_HTML() {
    local regexpr
    [[ "$pck_name" =~ ^[a-zA-Z0-9-]+$ ]] && \
       regexpr="^$pck_name-[^-]\+-[^-]\+$" || regexpr="$pck_name"
+   notify.debug "$FUNCNAME: regexpr = \"$regexpr\""
 
    local pckname_from_HTML=( $(sed -n "\
       # remove HTML tags --> get a better input
-      /<a href=\".*\.src\.rpm\"/{s|.*<a href=\"\([^\"]*\)\".*|\1|;bm;};
-      /<A HREF=\".*\.src\.rpm\"/{s|.*<A HREF=\"\([^\"]*\)\".*|\1|;bm;};
-      # exit loop (skip print) if the line do not match regexpr
-      /$regexpr/bm;be;
-      :m;/$regexpr/p;:e" $infile) )
-
+      /<[aA] [hH][rR][eE][fF]=\".*\.src\.rpm\"/{
+         s|.*<[aA] [hH][rR][eE][fF]=\"\([^\"]*\)\".*|\1|
+            {/$regexpr/p}
+      }" $infile) )
    echo "${pckname_from_HTML[*]}"
 }