[Mldonkey-commits] mldonkey distrib/ChangeLog src/daemon/common/co...

[mldonkey-commits]

CVSROOT:        /sources/mldonkey
Module name:    mldonkey
Changes by:     spiralvoice <spiralvoice>       11/03/10 19:24:53

Modified files:
        distrib        : ChangeLog 
        src/daemon/common: commonMessages.ml 
        src/daemon/driver: driverCommands.ml 

Log message:
        patch #7497

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/mldonkey/distrib/ChangeLog?cvsroot=mldonkey&r1=1.1518&r2=1.1519
http://cvs.savannah.gnu.org/viewcvs/mldonkey/src/daemon/common/commonMessages.ml?cvsroot=mldonkey&r1=1.74&r2=1.75
http://cvs.savannah.gnu.org/viewcvs/mldonkey/src/daemon/driver/driverCommands.ml?cvsroot=mldonkey&r1=1.262&r2=1.263

Patches:
Index: distrib/ChangeLog
===================================================================
RCS file: /sources/mldonkey/mldonkey/distrib/ChangeLog,v
retrieving revision 1.1518
retrieving revision 1.1519
diff -u -b -r1.1518 -r1.1519
--- distrib/ChangeLog   10 Mar 2011 19:23:54 -0000      1.1518
+++ distrib/ChangeLog   10 Mar 2011 19:24:53 -0000      1.1519
@@ -15,6 +15,7 @@
 =========
 
 2011/03/10
+7497: HTML: mark not saved values in options (ygrek)
 7496: BT: stop asking users to submit unknown client ids (ygrek)
 7495: Fix compilation of Ocaml 3.12.0 with recent binutils (ecc, glondu)
 7494: GTK2 GUI: fix too obtrusive splash window (bugmenot, ygrek)

Index: src/daemon/common/commonMessages.ml
===================================================================
RCS file: /sources/mldonkey/mldonkey/src/daemon/common/commonMessages.ml,v
retrieving revision 1.74
retrieving revision 1.75
diff -u -b -r1.74 -r1.75
--- src/daemon/common/commonMessages.ml 29 Aug 2010 20:13:31 -0000      1.74
+++ src/daemon/common/commonMessages.ml 10 Mar 2011 19:24:53 -0000      1.75
@@ -101,6 +101,7 @@
 input.but {
   background: @color_input_button@;
   }
+input.changed { border: 2px solid red; }
 a:link, a:active, a:visited {
   text-decoration: none;
   font-family: verdana;
@@ -612,6 +613,14 @@
        }
 }
 
+function track_changed(obj)
+{
+  if (obj.value != obj.defaultValue)
+    obj.className += \" changed\";
+  else
+    obj.className = obj.className.replace(/\\bchanged\\b/,'');
+}
+
 //-->
   "
 

Index: src/daemon/driver/driverCommands.ml
===================================================================
RCS file: /sources/mldonkey/mldonkey/src/daemon/driver/driverCommands.ml,v
retrieving revision 1.262
retrieving revision 1.263
diff -u -b -r1.262 -r1.263
--- src/daemon/driver/driverCommands.ml 31 Jan 2011 17:17:04 -0000      1.262
+++ src/daemon/driver/driverCommands.ml 10 Mar 2011 19:24:53 -0000      1.263
@@ -162,7 +162,7 @@
                                 o.option_value (if o.option_value="true" then 
"false" else "true")
           else
             Printf.bprintf buf "\\<input style=\\\"font-family: verdana; 
font-size: 10px;\\\"
-                                type=text name=value size=20 
value=\\\"%s\\\"\\>"
+                                type=text name=value 
onchange=\\\"track_changed(this)\\\" size=20 value=\\\"%s\\\"\\>"
                                 o.option_value;
         end;
         Printf.bprintf buf "\\</td\\>\\</form\\>\\<td 
class=\\\"sr\\\"\\>%s\\</td\\>" (shorten o.option_default 40);
@@ -203,7 +203,7 @@
               \\<tr\\>\\<td\\>\\<form action=\\\"submit\\\" $S\\>
 \\<input type=hidden name=setoption value=q\\>
 \\<input type=hidden name=option value=%s\\> %s \\</td\\>\\<td\\>
-              \\<input type=text name=value size=40 value=\\\"%s\\\"\\>
+              \\<input type=text name=value 
onchange=\\\"track_changed(this)\\\" size=40 value=\\\"%s\\\"\\>
 \\</td\\>\\</tr\\>
 \\</form\\>
               " o.option_name o.option_name o.option_value