From e342e68737e4be6d0c0a2dda760f9df98dddcbb7 Mon Sep 17 00:00:00 2001
From: mdipierro <massimo.dipierro@gmail.com>
Date: Wed, 19 Dec 2012 11:53:03 -0600
Subject: [PATCH] fixed issue 1226, delete_cascade class

---
 VERSION          | 2 +-
 gluon/sqlhtml.py | 9 ++++++++-
 2 files changed, 9 insertions(+), 2 deletions(-)

diff --git a/VERSION b/VERSION
index 5a5b1ed1..e50a0ff0 100644
--- a/VERSION
+++ b/VERSION
@@ -1 +1 @@
-Version 2.3.2 (2012-12-19 11:43:48) dev
+Version 2.3.2 (2012-12-19 11:52:16) dev
diff --git a/gluon/sqlhtml.py b/gluon/sqlhtml.py
index 01df16f4..a808276f 100644
--- a/gluon/sqlhtml.py
+++ b/gluon/sqlhtml.py
@@ -1125,8 +1125,15 @@ class SQLFORM(FORM):
         # when deletable, add delete? checkbox
         self.custom.deletable = ''
         if record and deletable:
+            #add secondary css class for cascade delete warning
+            css = 'delete'
+            for f in self.table.fields:
+                on_del = self.table[f].ondelete
+                if isinstance(on_del,str) and 'cascade' in on_del.lower():
+                    css += ' cascade_delete'
+                    break
             widget = INPUT(_type='checkbox',
-                           _class='delete',
+                           _class=css,
                            _id=self.FIELDKEY_DELETE_RECORD,
                            _name=self.FIELDNAME_REQUEST_DELETE,
                            )