Fixed testing codes that were not compliant with search user by email signature.

2017-02-01 18:57:15 +01:00
parent fae444c238
commit 1c829e16ff
2 changed files with 6 additions and 2 deletions
@@ -63,7 +63,9 @@ feature -- Test routines
 		do
 			u := default_user
 			storage.new_user (u)
-			assert ("Not void",  attached storage.user_by_email (u.email))
+			if attached u.email as l_email then
+				assert ("Not void",  attached storage.user_by_email (l_email))
+			end
 			assert ("Not void",  attached storage.user_by_id (2))
 			assert ("Not void",  attached storage.user_by_id (2) as l_user and then l_user.id = 2 and then l_user.name ~ u.name)
 			assert ("Not void",  attached storage.user_by_name (u.name))