[Mldonkey-commits] mldonkey distrib/ChangeLog src/networks/bittorr...

[mldonkey-commits]

CVSROOT:        /sources/mldonkey
Module name:    mldonkey
Changes by:     spiralvoice <spiralvoice>       06/08/21 18:30:15

Modified files:
        distrib        : ChangeLog 
        src/networks/bittorrent: bTOptions.ml 

Log message:
        patch #5303

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/mldonkey/distrib/ChangeLog?cvsroot=mldonkey&r1=1.968&r2=1.969
http://cvs.savannah.gnu.org/viewcvs/mldonkey/src/networks/bittorrent/bTOptions.ml?cvsroot=mldonkey&r1=1.29&r2=1.30

Patches:
Index: distrib/ChangeLog
===================================================================
RCS file: /sources/mldonkey/mldonkey/distrib/ChangeLog,v
retrieving revision 1.968
retrieving revision 1.969
diff -u -b -r1.968 -r1.969
--- distrib/ChangeLog   21 Aug 2006 18:29:20 -0000      1.968
+++ distrib/ChangeLog   21 Aug 2006 18:30:15 -0000      1.969
@@ -15,6 +15,7 @@
 =========
 
 2006/08/21
+5303: cleanup btOptions.ml (whitespace, tabs, comments) (Schlumpf)
 5302: cleanup commonOptions.ml (whitespace, tabs, comments) (Schlumpf)
 5318: Fix wrong buildinfo configure args with autoconf 2.60
 5317: Compile fix for GTK1 newgui in addition to patch 5310

Index: src/networks/bittorrent/bTOptions.ml
===================================================================
RCS file: /sources/mldonkey/mldonkey/src/networks/bittorrent/bTOptions.ml,v
retrieving revision 1.29
retrieving revision 1.30
diff -u -b -r1.29 -r1.30
--- src/networks/bittorrent/bTOptions.ml        22 Jun 2006 19:33:52 -0000      
1.29
+++ src/networks/bittorrent/bTOptions.ml        21 Aug 2006 18:30:15 -0000      
1.30
@@ -44,7 +44,8 @@
   client_uid_from_version ^ client_uid_random_tail
 
 let client_uid = define_option bittorrent_section ["client_uid"]
-    "The UID of this client" Sha1.option (Sha1.direct_of_string 
generate_client_uid)
+  "The UID of this client"
+    Sha1.option (Sha1.direct_of_string generate_client_uid)
 
 (* Check if the uid is in sync with Autoconf.current_version *)
 let check_client_uid () =
@@ -98,7 +99,8 @@
     int_option (-1)
 
 let import_new_torrents_interval = define_option bittorrent_section 
["import_new_torrents_interval"]
-    "Interval in seconds 'torrents/incoming' is scanned for new torrent files 
to be downloaded, 0 to deactivate, changes require restart"
+  "Interval in seconds 'torrents/incoming' is scanned for new torrent files to 
be downloaded,
+  0 to deactivate, changes require restart"
     float_option 60.
 
 let _ =
@@ -120,7 +122,8 @@
     int_option 300
 
 let client_timeout = define_option bittorrent_section ["client_timeout"]
-  "Timeout on client connections" float_option 90.
+  "Timeout on client connections"
+    float_option 90.
 
 let user_agent = define_option bittorrent_section ["user_agent"]
     "User agent string (default = \"default\")"
@@ -130,9 +133,9 @@
     "(internal option)"
     int_option 0
 
-let old_files =
-  define_option bittorrent_section ["old_files"]
-    "" (list_option (tuple2_option (string_option, int64_option))) []
+let old_files = define_option bittorrent_section ["old_files"]
+  ""
+    (list_option (tuple2_option (string_option, int64_option))) []
 
 let get_user_agent () = 
   if !!user_agent = "default" then