--- session.cc.orig	Thu Jan  6 15:54:06 2000
+++ session.cc	Sun Jun 25 02:06:00 2000
@@ -236,15 +236,27 @@
     userIdValue
   };
 
-  SmProp *properties[5] = {
+  char val = 30;
+  SmPropValue gsmPriorityValue[1] = {
+      {1, &val}
+  };
+  SmProp gsmPriority = {
+    "_GSM_Priority",
+    SmCARD8,
+    1,
+    gsmPriorityValue
+  };
+
+  SmProp *properties[6] = {
     &cloneCommand,
     &discardCommand,
     &program,
     &restartCommand,
-    &userId
+    &userId,
+    &gsmPriority
   };
   
-  SmcSetProperties(connId, 5, properties);
+  SmcSetProperties(connId, 6, properties);
 }
 
 Bool