diff --git a/SoObjects/SOGo/SOGoCASSession.m b/SoObjects/SOGo/SOGoCASSession.m
index 34b056ac4..6d6716454 100644
--- a/SoObjects/SOGo/SOGoCASSession.m
+++ b/SoObjects/SOGo/SOGoCASSession.m
@@ -381,6 +381,8 @@
                        andParameters: params];
   identifier = [SOGoObject globallyUniqueObjectId];
   [identifier retain];
+  if (![pgt length])
+    [self warnWithFormat: @"failure to obtain a PGT from the C.A.S. service"];
 
   cacheUpdateNeeded = YES;
 }