Made cms uploading file safer.

2016-11-30 15:40:12 +01:00
parent 7d50973fd5
commit 18d26a765a
1 changed files with 10 additions and 1 deletions
--- a/modules/files/cms_uploaded_file.e
+++ b/modules/files/cms_uploaded_file.e
@@ -98,8 +98,17 @@ feature -- Element change
 feature -- Basic operation

 	move_to (p: PATH): BOOLEAN
+		local
+			retried: BOOLEAN
 		do
-			Result := uploaded_file.move_to (p.name)
+			if retried then
+				Result := False
+			else
+				Result := uploaded_file.move_to (p.name)
+			end
+		rescue
+			retried := True
+			retry
 		end

 end