From 48d7ba62d7f8d618bc54a42eef3a00568e234c24 Mon Sep 17 00:00:00 2001
From: B. Watson
Date: Sun, 26 Jan 2020 04:03:12 -0500
Subject: perl/perl-Image-Magick: Remove - from VERSION, reflow README.

Signed-off-by: B. Watson <yalhcru@gmail.com>
---
 perl/perl-Image-Magick/README                       |  9 +++++----
 perl/perl-Image-Magick/perl-Image-Magick.SlackBuild | 10 +++++-----
 perl/perl-Image-Magick/perl-Image-Magick.info       |  2 +-
 perl/perl-Image-Magick/slack-desc                   |  2 +-
 4 files changed, 12 insertions(+), 11 deletions(-)

diff --git a/perl/perl-Image-Magick/README b/perl/perl-Image-Magick/README
index 1e824c5222..0e059256c8 100644
--- a/perl/perl-Image-Magick/README
+++ b/perl/perl-Image-Magick/README
@@ -1,5 +1,6 @@
-Image::Magick - objected-oriented Perl interface to ImageMagick. Use it to create, edit, compose,
-		    or convert bitmap images from within a Perl script.
+Image::Magick - objected-oriented Perl interface to ImageMagick. Use it
+to create, edit, compose, or convert bitmap images from within a Perl script.
 
-This Perl extension allows the reading, manipulation and writing of a large number of image file
-formats using the ImageMagick library. It was originally developed to be used by CGI scripts for Web pages.
+This Perl extension allows the reading, manipulation and writing of a
+large number of image file formats using the ImageMagick library. It
+was originally developed to be used by CGI scripts for Web pages.
diff --git a/perl/perl-Image-Magick/perl-Image-Magick.SlackBuild b/perl/perl-Image-Magick/perl-Image-Magick.SlackBuild
index 02b50c498a..875c5ed930 100644
--- a/perl/perl-Image-Magick/perl-Image-Magick.SlackBuild
+++ b/perl/perl-Image-Magick/perl-Image-Magick.SlackBuild
@@ -25,13 +25,13 @@
 # !!!!!!!!  make test commented out  !!!!!!!!!!
 
 PRGNAM=perl-Image-Magick
-VERSION=${VERSION:-6.89}
-SUBVERSION=${SUBVERSION:-1}
+VERSION=${VERSION:-6.89_1}
 BUILD=${BUILD:-1}
 TAG=${TAG:-_SBo}
 
 SRCNAM="PerlMagick"
-#SRCNAM="$(printf $PRGNAM | cut -d- -f2-)"
+SRCVER="${VERSION/_/-}"
+DIRVER="$( echo $VERSION | cut -d_ -f1 )"
 
 if [ -z "$ARCH" ]; then
   case "$( uname -m )" in
@@ -66,8 +66,8 @@ rm -rf $PKG
 mkdir -p $TMP $PKG $OUTPUT
 cd $TMP
 rm -rf $SRCNAM-$VERSION
-tar xvf $CWD/$SRCNAM-$VERSION-$SUBVERSION.tar.gz
-cd $SRCNAM-$VERSION
+tar xvf $CWD/$SRCNAM-$SRCVER.tar.gz
+cd $SRCNAM-$DIRVER
 chown -R root:root .
 find -L . \
  \( -perm 777 -o -perm 775 -o -perm 750 -o -perm 711 -o -perm 555 \
diff --git a/perl/perl-Image-Magick/perl-Image-Magick.info b/perl/perl-Image-Magick/perl-Image-Magick.info
index 0fe9350062..98f8cb637f 100644
--- a/perl/perl-Image-Magick/perl-Image-Magick.info
+++ b/perl/perl-Image-Magick/perl-Image-Magick.info
@@ -1,5 +1,5 @@
 PRGNAM="perl-Image-Magick"
-VERSION="6.89-1"
+VERSION="6.89_1"
 HOMEPAGE="https://metacpan.org/pod/Image::Magick"
 DOWNLOAD="https://cpan.metacpan.org/authors/id/J/JC/JCRISTY/PerlMagick-6.89-1.tar.gz"
 MD5SUM="3df09405f4669def87b56a6e018b898b"
diff --git a/perl/perl-Image-Magick/slack-desc b/perl/perl-Image-Magick/slack-desc
index aa5a0361e2..3d5be8025d 100644
--- a/perl/perl-Image-Magick/slack-desc
+++ b/perl/perl-Image-Magick/slack-desc
@@ -6,7 +6,7 @@
 # customary to leave one space after the ':' except on otherwise blank lines.
 
                  |-----handy-ruler------------------------------------------------------|
-perl-Image-Magick: perl-Image-Magick  (Perl Objected-oriented interface to ImageMagick)
+perl-Image-Magick: perl-Image-Magick (Perl Objected-oriented interface to ImageMagick)
 perl-Image-Magick:
 perl-Image-Magick: This Perl extension allows the reading, manipulation and writing of
 perl-Image-Magick: a large number of image file formats using the ImageMagick library.
-- 
cgit v1.2.3