From 1456825ed4e2bb12e36215f6bc31ac585cb4b023 Mon Sep 17 00:00:00 2001
From: Jamie Cameron <jcameron@webmin.com>
Date: Fri, 18 Mar 2016 22:38:07 -0700
Subject: [PATCH] Fix parsing in debug mode
 https://sourceforge.net/p/webadmin/bugs/4723/

---
 samba/samba-lib.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/samba/samba-lib.pl b/samba/samba-lib.pl
index b57fbda45..10b7673ff 100755
--- a/samba/samba-lib.pl
+++ b/samba/samba-lib.pl
@@ -597,7 +597,7 @@ while(<PASS>) {
 	chop;
 	s/#.*$//g;
 	local @b = split(/:/, $_);
-	next if (@b < 4);
+	next if (@b < 4 || $b[1] !~ /^\d+$/);
 	local $u = { 'name' => $b[0],  'uid' => $b[1],
 		     'pass1' => $b[2], 'pass2' => $b[3],
 		     'oldname' => $b[0] };