aballier    15/07/16 13:22:23

  Added:                lwt.patch
  Log:
  Backport upstream fix to build with lwt 2.5. Install manpages in the proper 
location.
  
  (Portage version: 2.2.20/cvs/Linux x86_64, signed Manifest commit with key 
160F534A)

Revision  Changes    Path
1.1                  dev-ml/eliom/files/lwt.patch

file : 
http://sources.gentoo.org/viewvc.cgi/gentoo-x86/dev-ml/eliom/files/lwt.patch?rev=1.1&view=markup
plain: 
http://sources.gentoo.org/viewvc.cgi/gentoo-x86/dev-ml/eliom/files/lwt.patch?rev=1.1&content-type=text/plain

Index: lwt.patch
===================================================================
commit 107338c381b6a489c24c2dc9874de028a2cd08a3
Author: Drup <[email protected]>
Date:   Fri Jan 16 16:42:33 2015 +0100

    Remove dependency to Lwt_util.

diff --git a/src/lib/eliom_state.server.ml b/src/lib/eliom_state.server.ml
index f7ea0ca..3523fc3 100644
--- a/src/lib/eliom_state.server.ml
+++ b/src/lib/eliom_state.server.ml
@@ -561,7 +561,7 @@ let set_persistent_data_session_group ?set_max
     ?set_max
     (fst sitedata.Eliom_common.max_persistent_data_sessions_per_group)
     c.Eliom_common.pc_value !grp n in
-  lwt () = Lwt_util.iter
+  lwt () = Lwt_list.iter_p
     (Eliommod_persess.close_persistent_state2
        ~scope:(scope:>Eliom_common.user_scope) sitedata None) l in
   grp := n;
diff --git a/src/lib/server/eliommod_gc.ml b/src/lib/server/eliommod_gc.ml
index 5655ddf..6ab298d 100644
--- a/src/lib/server/eliommod_gc.ml
+++ b/src/lib/server/eliommod_gc.ml
@@ -135,7 +135,7 @@ let gc_timeouted_services now tables =
               Lwt.return ()
         end
   in
-  Lwt_util.iter_serial
+  Lwt_list.iter_s
     (fun (_gen, _prio, t) -> empty_one t) tables.Eliom_common.table_services
   >>= fun () ->
   tables.Eliom_common.table_services <-
diff --git a/src/lib/server/eliommod_pagegen.ml 
b/src/lib/server/eliommod_pagegen.ml
index 1e2d0b4..e0a96a6 100644
--- a/src/lib/server/eliommod_pagegen.ml
+++ b/src/lib/server/eliommod_pagegen.ml
@@ -99,7 +99,6 @@ let update_cookie_table ?now sitedata (ci, sci) =
 
 
   (* Update persistent expiration date, user timeout and value *)
-  (* Lwt_util.iter *)
     Eliom_common.Full_state_name_table.fold
 
       (fun name v thr ->
diff --git a/src/lib/server/eliommod_persess.ml 
b/src/lib/server/eliommod_persess.ml
index 18c0f5b..9e25906 100644
--- a/src/lib/server/eliommod_persess.ml
+++ b/src/lib/server/eliommod_persess.ml
@@ -152,7 +152,7 @@ let rec find_or_create_persistent_cookie_
       ?set_max:set_max_in_group
       (fst sitedata.Eliom_common.max_persistent_data_sessions_per_group)
       c fullsessgrp >>= fun l ->
-    Lwt_util.iter (close_persistent_state2
+    Lwt_list.iter_p (close_persistent_state2
                      ~scope:(cookie_scope :> Eliom_common.user_scope)
                      sitedata None) l
     >>= fun () ->
diff --git a/src/lib/server/eliommod_sessiongroups.ml 
b/src/lib/server/eliommod_sessiongroups.ml
index e69a62a..b7eb8f7 100644
--- a/src/lib/server/eliommod_sessiongroups.ml
+++ b/src/lib/server/eliommod_sessiongroups.ml
@@ -475,7 +475,7 @@ module Pers = struct
         (* First we close all sessions in the group *)
 
         find sess_grp >>= fun cl ->
-        Lwt_util.iter
+        Lwt_list.iter_p
           (close_persistent_session2
              ~cookie_level:(match cookie_level with
                | `Client_process _ -> `Client_process | `Session -> `Session)




Reply via email to