summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAlexis Ballier <aballier@gentoo.org>2008-06-16 20:46:11 +0000
committerAlexis Ballier <aballier@gentoo.org>2008-06-16 20:46:11 +0000
commit659001f1690041f27072c9602461741428dfce07 (patch)
tree592bb5d9468c157d287e548db0d4e5f710bb303b /net-misc/unison/files
parentarm/s390/sh love (diff)
downloadgentoo-2-659001f1690041f27072c9602461741428dfce07.tar.gz
gentoo-2-659001f1690041f27072c9602461741428dfce07.tar.bz2
gentoo-2-659001f1690041f27072c9602461741428dfce07.zip
remove unused versions
(Portage version: 2.1.5.5)
Diffstat (limited to 'net-misc/unison/files')
-rw-r--r--net-misc/unison/files/ocaml-3.08-extnames.patch14
-rw-r--r--net-misc/unison/files/unison-2.12.0-gtk2-bug.patch11
-rw-r--r--net-misc/unison/files/unison-2.17.1-io-error.patch66
3 files changed, 0 insertions, 91 deletions
diff --git a/net-misc/unison/files/ocaml-3.08-extnames.patch b/net-misc/unison/files/ocaml-3.08-extnames.patch
deleted file mode 100644
index e959be2f3991..000000000000
--- a/net-misc/unison/files/ocaml-3.08-extnames.patch
+++ /dev/null
@@ -1,14 +0,0 @@
-diff -ur unison-2.9.1/ubase/uprintf.ml unison-2.9.1.patched/ubase/uprintf.ml
---- unison-2.9.1/ubase/uprintf.ml 2002-04-11 07:13:23.000000000 +0200
-+++ unison-2.9.1.patched/ubase/uprintf.ml 2004-08-08 14:10:09.784776851 +0200
-@@ -10,8 +10,8 @@
- (* *)
- (***********************************************************************)
-
--external format_int: string -> int -> string = "format_int"
--external format_float: string -> float -> string = "format_float"
-+external format_int: string -> int -> string = "caml_format_int"
-+external format_float: string -> float -> string = "caml_format_float"
-
- let fprintf outchan doafter format =
- let format = (Obj.magic format : string) in
diff --git a/net-misc/unison/files/unison-2.12.0-gtk2-bug.patch b/net-misc/unison/files/unison-2.12.0-gtk2-bug.patch
deleted file mode 100644
index 637f19adcb28..000000000000
--- a/net-misc/unison/files/unison-2.12.0-gtk2-bug.patch
+++ /dev/null
@@ -1,11 +0,0 @@
---- uigtk2.ml.old 2005-03-12 17:17:59.000000000 +0100
-+++ uigtk2.ml 2005-07-13 19:55:34.856959280 +0200
-@@ -1314,7 +1314,7 @@
- mainWindow#scroll_vertical `JUMP (min p 1.) in
-
- ignore (mainWindow#connect#unselect_row ~callback:
-- (fun ~row ~column ~event -> current := None; updateDetails ()));
-+ (fun ~row ~column ~event -> current := None));
- ignore (mainWindow#connect#select_row ~callback:
- (fun ~row ~column ~event -> current := Some row; updateDetails ()));
-
diff --git a/net-misc/unison/files/unison-2.17.1-io-error.patch b/net-misc/unison/files/unison-2.17.1-io-error.patch
deleted file mode 100644
index eea448534504..000000000000
--- a/net-misc/unison/files/unison-2.17.1-io-error.patch
+++ /dev/null
@@ -1,66 +0,0 @@
-diff -uNr unison-2.17.1.orig/stasher.ml unison-2.17.1/stasher.ml
---- unison-2.17.1.orig/stasher.ml 2005-08-11 17:26:59.000000000 -0700
-+++ unison-2.17.1/stasher.ml 2006-09-13 12:04:18.000000000 -0700
-@@ -314,23 +314,36 @@
- (Path.toString backPath)
- (Fspath.toString backRoot));
- try Os.rename fspath path backRoot backPath
-- with
-- _ ->
-- ((let info = Fileinfo.get true fspath path in
-- match info.Fileinfo.typ with
-- `SYMLINK ->
-- Os.symlink
-- backRoot backPath
-- (Os.readLink fspath path)
-- | _ ->
-- Copy.localFile
-- fspath path
-- backRoot backPath backPath
-- `Copy
-- info.Fileinfo.desc
-- (Osx.ressLength info.Fileinfo.osX.Osx.ressInfo)
-- None);
-- Os.delete fspath path)
-+ with
-+ _ ->
-+ debug (fun () -> Util.msg "Rename failed -- copying instead\n");
-+ let rec copy p backp =
-+ let info = Fileinfo.get true fspath p in
-+ match info.Fileinfo.typ with
-+ | `SYMLINK ->
-+ debug (fun () -> Util.msg " Copying link %s / %s to %s / %s\n"
-+ (Fspath.toString fspath) (Path.toString p)
-+ (Fspath.toString backRoot) (Path.toString backp));
-+ Os.symlink backRoot backp (Os.readLink fspath p)
-+ | `FILE ->
-+ debug (fun () -> Util.msg " Copying file %s / %s to %s / %s\n"
-+ (Fspath.toString fspath) (Path.toString p)
-+ (Fspath.toString backRoot) (Path.toString backp));
-+ Copy.localFile fspath p backRoot backp backp
-+ `Copy info.Fileinfo.desc
-+ (Osx.ressLength info.Fileinfo.osX.Osx.ressInfo) None
-+ | `DIRECTORY ->
-+ debug (fun () -> Util.msg " Copying directory %s / %s to %s / %s\n"
-+ (Fspath.toString fspath) (Path.toString p)
-+ (Fspath.toString backRoot) (Path.toString backp));
-+ Os.createDir backRoot backp info.Fileinfo.desc;
-+ let ch = Os.childrenOf fspath p in
-+ Safelist.iter (fun n -> copy (Path.child p n) (Path.child backp n)) ch
-+ | `ABSENT -> assert false in
-+ copy path backPath;
-+ debug (fun () -> Util.msg " Finished copying; deleting %s / %s\n"
-+ (Fspath.toString fspath) (Path.toString path));
-+ Os.delete fspath path
- end else begin
- debug ( fun () -> Util.msg
- "File %s in %s will not be backed up.\n"
-diff -uNr unison-2.17.1.orig/uutil.ml unison-2.17.1/uutil.ml
---- unison-2.17.1.orig/uutil.ml 2005-08-11 17:26:59.000000000 -0700
-+++ unison-2.17.1/uutil.ml 2006-09-13 12:01:33.000000000 -0700
-@@ -123,4 +123,4 @@
- end else if !l > 0 then
- notify !l
- in
-- Util.convertUnixErrorsToTransient "readWrite" (fun () -> read len)
-+ Util.convertUnixErrorsToTransient "readWriteBounded" (fun () -> read len)