It is unused.
Suggestetd-by: Fam Zheng <famz@redhat.com>
Signed-off-by: Kevin Wolf <kwolf@redhat.com>
---
tests/qemu-iotests/common.config | 18 ------------------
1 file changed, 18 deletions(-)
diff --git a/tests/qemu-iotests/common.config b/tests/qemu-iotests/common.config
index 1222e43..66f4e0b 100644
--- a/tests/qemu-iotests/common.config
+++ b/tests/qemu-iotests/common.config
@@ -204,23 +204,5 @@ fi
export SAMPLE_IMG_DIR
-_readlink()
-{
- if [ $# -ne 1 ]; then
- echo "Usage: _readlink filename" 1>&2
- exit 1
- fi
-
- perl -e "\$in=\"$1\";" -e '
- $lnk = readlink($in);
- if ($lnk =~ m!^/.*!) {
- print "$lnk\n";
- }
- else {
- chomp($dir = `dirname $in`);
- print "$dir/$lnk\n";
- }'
-}
-
# make sure this script returns success
true
--
1.8.3.1
On Fri, 04/21 10:01, Kevin Wolf wrote:
> It is unused.
>
> Suggestetd-by: Fam Zheng <famz@redhat.com>
> Signed-off-by: Kevin Wolf <kwolf@redhat.com>
> ---
> tests/qemu-iotests/common.config | 18 ------------------
> 1 file changed, 18 deletions(-)
>
> diff --git a/tests/qemu-iotests/common.config b/tests/qemu-iotests/common.config
> index 1222e43..66f4e0b 100644
> --- a/tests/qemu-iotests/common.config
> +++ b/tests/qemu-iotests/common.config
> @@ -204,23 +204,5 @@ fi
>
> export SAMPLE_IMG_DIR
>
> -_readlink()
> -{
> - if [ $# -ne 1 ]; then
> - echo "Usage: _readlink filename" 1>&2
> - exit 1
> - fi
> -
> - perl -e "\$in=\"$1\";" -e '
> - $lnk = readlink($in);
> - if ($lnk =~ m!^/.*!) {
> - print "$lnk\n";
> - }
> - else {
> - chomp($dir = `dirname $in`);
> - print "$dir/$lnk\n";
> - }'
> -}
> -
> # make sure this script returns success
> true
> --
> 1.8.3.1
>
Reviewed-by: Fam Zheng <famz@redhat.com>
On 04/21/2017 03:01 AM, Kevin Wolf wrote: > It is unused. Might be worth also mentioning that it was the file's only client of perl, so removing it also makes it easier to justify removing a check for $PERL. > > Suggestetd-by: Fam Zheng <famz@redhat.com> > Signed-off-by: Kevin Wolf <kwolf@redhat.com> > --- > tests/qemu-iotests/common.config | 18 ------------------ > 1 file changed, 18 deletions(-) Reviewed-by: Eric Blake <eblake@redhat.com> -- Eric Blake, Principal Software Engineer Red Hat, Inc. +1-919-301-3266 Virtualization: qemu.org | libvirt.org
On 21.04.2017 10:01, Kevin Wolf wrote:
> It is unused.
>
> Suggestetd-by: Fam Zheng <famz@redhat.com>
*Suggested
And, since it now would be rude not to, with that fixed:
Reviewed-by: Max Reitz <mreitz@redhat.com>
> Signed-off-by: Kevin Wolf <kwolf@redhat.com>
> ---
> tests/qemu-iotests/common.config | 18 ------------------
> 1 file changed, 18 deletions(-)
>
> diff --git a/tests/qemu-iotests/common.config b/tests/qemu-iotests/common.config
> index 1222e43..66f4e0b 100644
> --- a/tests/qemu-iotests/common.config
> +++ b/tests/qemu-iotests/common.config
> @@ -204,23 +204,5 @@ fi
>
> export SAMPLE_IMG_DIR
>
> -_readlink()
> -{
> - if [ $# -ne 1 ]; then
> - echo "Usage: _readlink filename" 1>&2
> - exit 1
> - fi
> -
> - perl -e "\$in=\"$1\";" -e '
> - $lnk = readlink($in);
> - if ($lnk =~ m!^/.*!) {
> - print "$lnk\n";
> - }
> - else {
> - chomp($dir = `dirname $in`);
> - print "$dir/$lnk\n";
> - }'
> -}
> -
> # make sure this script returns success
> true
>
© 2016 - 2026 Red Hat, Inc.