File 0003-md5pass-don-t-use-Crypt-PasswdMD5-bnc-701279-bnc-475.patch of Package syslinux

From 1e2ed2e94cdc00750efe3b8de9e2aafe400b09aa Mon Sep 17 00:00:00 2001
From: Steffen Winterfeldt <snwint@suse.de>
Date: Tue, 21 Jun 2011 16:36:27 +0200
Subject: [PATCH 03/22] md5pass: don't use Crypt::PasswdMD5 (bnc#701279,
 bnc#475370)

---
 utils/md5pass | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/utils/md5pass b/utils/md5pass
index 3404f1d6..4b60d0f6 100755
--- a/utils/md5pass
+++ b/utils/md5pass
@@ -1,7 +1,6 @@
 #!/usr/bin/perl
 
 use bytes;
-use Crypt::PasswdMD5;
 use MIME::Base64;
 
 sub random_bytes($) {
@@ -31,4 +30,4 @@ unless (defined($salt)) {
     $salt =~ tr/\+/./;		# . not +
 }
 
-print unix_md5_crypt($pass, $salt), "\n";
+print crypt($pass, "\$1\$$salt\$"), "\n";
-- 
2.42.0