From 7f4537bda3225f69ba1eaff326e4cfd47dcfd94f Mon Sep 17 00:00:00 2001
From: Aleksandr Dmitriev <admitriev@cheby.ru>
Date: Fri, 17 Mar 2017 17:14:10 +0300
Subject: [PATCH] When there is tableSlider checkbox can't taggle state

---
 Eludia/Presentation/Skins/TurboMilk.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)
 mode change 100755 => 100644 Eludia/Presentation/Skins/TurboMilk.pm

diff --git a/Eludia/Presentation/Skins/TurboMilk.pm b/Eludia/Presentation/Skins/TurboMilk.pm
old mode 100755
new mode 100644
index b5f3984cf..0d38eaec6
--- a/Eludia/Presentation/Skins/TurboMilk.pm
+++ b/Eludia/Presentation/Skins/TurboMilk.pm
@@ -2868,7 +2868,7 @@ sub draw_text_cell {
 
 	$html .= '<nobr>' unless $data -> {no_nobr};
 
-	if ($has_href) {
+	if ($has_href && index($data -> {label}, 'type=checkbox') == -1) {
 
 		$a_attributes_html = dump_attributes ({
 			id      => $data -> {a_id},
@@ -2896,7 +2896,7 @@ sub draw_text_cell {
 	$html .= '</i>'      if $data -> {italic} || $options -> {italic};
 	$html .= '</b>'      if $data -> {bold}   || $options -> {bold};
 
-	if ($has_href) {
+	if ($has_href && index($data -> {label}, 'type=checkbox') == -1) {
 
 		$html .= '</span></a>';