Go to:
Gentoo Home
Documentation
Forums
Lists
Bugs
Planet
Store
Wiki
Get Gentoo!
Gentoo's Bugzilla – Attachment 620922 Details for
Bug 704910
net-misc/unison-2.51.2 : Error: The implementation /var/tmp/portage/net-misc/unison-2.51.2/work/src/system.ml
Home
|
New
–
[Ex]
|
Browse
|
Search
|
Privacy Policy
|
[?]
|
Reports
|
Requests
|
Help
|
New Account
|
Log In
[x]
|
Forgot Password
Login:
[x]
[patch]
Patch for unison-2.51
unison-2.51.2-ocaml-4.08.patch (text/plain), 1.66 KB, created by
Petr Zima
on 2020-03-17 16:22:06 UTC
(
hide
)
Description:
Patch for unison-2.51
Filename:
MIME Type:
Creator:
Petr Zima
Created:
2020-03-17 16:22:06 UTC
Size:
1.66 KB
patch
obsolete
>diff -ur src.orig/files.ml src/files.ml >--- src.orig/files.ml 2018-01-27 21:53:44.000000000 +0100 >+++ src/files.ml 2019-12-11 16:12:40.005712137 +0100 >@@ -734,7 +734,7 @@ > with End_of_file -> > dirh.System.closedir () > end; >- Sort.list (<) !files >+ List.sort compare !files > > let ls dir pattern = > Util.convertUnixErrorsToTransient >diff -ur src.orig/recon.ml src/recon.ml >--- src.orig/recon.ml 2018-01-27 21:53:44.000000000 +0100 >+++ src/recon.ml 2019-12-11 16:12:40.005712137 +0100 >@@ -661,8 +661,8 @@ > > (* Sorts the paths so that they will be displayed in order *) > let sortPaths pathUpdatesList = >- Sort.list >- (fun (p1, _) (p2, _) -> Path.compare p1 p2 <= 0) >+ List.sort >+ (fun (p1, _) (p2, _) -> Path.compare p1 p2) > pathUpdatesList > > let rec enterPath p1 p2 t = >diff -ur src.orig/system/system_generic.ml src/system/system_generic.ml >--- src.orig/system/system_generic.ml 2018-01-27 21:53:44.000000000 +0100 >+++ src/system/system_generic.ml 2019-12-11 16:12:40.005712137 +0100 >@@ -47,7 +47,7 @@ > let chmod = Unix.chmod > let chown = Unix.chown > let utimes = Unix.utimes >-let link = Unix.link >+let link s1 s2 = Unix.link s1 s2 > let openfile = Unix.openfile > let opendir f = > let h = Unix.opendir f in >diff -ur src.orig/uigtk2.ml src/uigtk2.ml >--- src.orig/uigtk2.ml 2018-01-27 21:53:44.000000000 +0100 >+++ src/uigtk2.ml 2019-12-11 16:12:40.005712137 +0100 >@@ -94,7 +94,7 @@ > let icon = > let p = GdkPixbuf.create ~width:48 ~height:48 ~has_alpha:true () in > Gpointer.blit >- (Gpointer.region_of_string Pixmaps.icon_data) (GdkPixbuf.get_pixels p); >+ (Gpointer.region_of_bytes Pixmaps.icon_data) (GdkPixbuf.get_pixels p); > p > > let leftPtrWatch =
You cannot view the attachment while viewing its details because your browser does not support IFRAMEs.
View the attachment on a separate page
.
View Attachment As Diff
View Attachment As Raw
Actions:
View
|
Diff
Attachments on
bug 704910
:
602710
|
602712
|
602714
|
602716
|
602718
|
602720
| 620922