diff --git a/src/persistence/core/cms_core_storage_sql_i.e b/src/persistence/core/cms_core_storage_sql_i.e
index 2968eb8..c785fc3 100644
--- a/src/persistence/core/cms_core_storage_sql_i.e
+++ b/src/persistence/core/cms_core_storage_sql_i.e
@@ -284,7 +284,6 @@ feature -- Misc
 			-- Values as list of [name, type, value].
 		local
 			l_type, l_name: READABLE_STRING_8
-			l_value: READABLE_STRING_32
 		do
 			error_handler.reset
 			create {ARRAYED_LIST [TUPLE [name: READABLE_STRING_GENERAL; type: detachable READABLE_STRING_8; value: detachable READABLE_STRING_32]]} Result.make (5)
diff --git a/src/service/cms_api.e b/src/service/cms_api.e
index 2338e06..18e73ce 100644
--- a/src/service/cms_api.e
+++ b/src/service/cms_api.e
@@ -604,7 +604,6 @@ feature -- Hook
 			jobj,jo,j: JSON_OBJECT
 			f: PLAIN_TEXT_FILE
 			u: CMS_USER
-			s: STRING_32
 		do
 			if attached a_response.has_permissions (<<"admin export", "export core">>) then
 				if a_export_id_list = Void then -- Include everything