Index: trunk/kernel/action.php
===================================================================
diff -u -N -r1054 -r1066
--- trunk/kernel/action.php	(.../action.php)	(revision 1054)
+++ trunk/kernel/action.php	(.../action.php)	(revision 1066)
@@ -1250,7 +1250,7 @@
              $Themes = new clsThemeList();
              foreach($_POST["itemlist"] as $id)
              {
-                 $Themes->DeleteTheme($id);
+                 $deleting_primary = (!$Themes->DeleteTheme($id));
              }
          }
      break;
Index: trunk/admin/config/config_theme.php
===================================================================
diff -u -N -r822 -r1066
--- trunk/admin/config/config_theme.php	(.../config_theme.php)	(revision 822)
+++ trunk/admin/config/config_theme.php	(.../config_theme.php)	(revision 1066)
@@ -213,6 +213,15 @@
     </td>
   </tr>
 </table>
+<?php } 
+if ($deleting_primary) { ?>
+<table width="100%" border="0" cellspacing="0" cellpadding="0" class="toolbar">
+  <tr>
+    <td valign="top">
+      <?php int_hint_red(admin_language('la_Warning_Primary_Delete')); ?>
+    </td>
+  </tr>
+</table>
 <?php } ?>
 <form name="theme" ID="theme" action="<?php echo $_SERVER["PHP_SELF"]."?".$envar;?>" method=POST>
 <table cellSpacing="0" cellPadding="2" width="100%" class="tableborder">
Index: trunk/kernel/include/theme.php
===================================================================
diff -u -N -r1054 -r1066
--- trunk/kernel/include/theme.php	(.../theme.php)	(revision 1054)
+++ trunk/kernel/include/theme.php	(.../theme.php)	(revision 1066)
@@ -657,7 +657,15 @@
     function DeleteTheme($ThemeId)
     {
         $t = $this->GetItem($ThemeId);
-        if (!$t->Get('PrimaryTheme')) $t->Delete();
+        if (!$t->Get('PrimaryTheme')) 
+        {
+        	$t->Delete();
+        	return true;
+        } 
+        else 
+        {
+        	return false;
+        }
     }                                 
 
     function SetPrimaryTheme($ThemeId)