diff --git a/cde/programs/dtcm/dtcm/group_editor.c b/cde/programs/dtcm/dtcm/group_editor.c
index 6c6b1749f..cb51f948f 100644
--- a/cde/programs/dtcm/dtcm/group_editor.c
+++ b/cde/programs/dtcm/dtcm/group_editor.c
@@ -1684,13 +1684,15 @@ add_to_gaccess_list(
 	int		cnt = 1;
 	char		access, *buf;
 	XmString	xmstr;
-	Calendar	*c = ge->cal;
+	Calendar	*c;
 	Props_pu	*p = (Props_pu *)ge->cal->properties_pu;
 	Access_data	*new_data = NULL;
 
 	if (!ge)
 		return;
 
+	c = ge->cal;
+
 	while (ge->access_data && cnt <= ge->access_data->count) {
 		new_data = (Access_data *)
 			CmDataListGetData(ge->access_data, cnt);