diff options
| author | Richard W.M. Jones <rjones@redhat.com> | 2012-06-18 08:35:14 +0100 |
|---|---|---|
| committer | Richard W.M. Jones <rjones@redhat.com> | 2012-06-27 16:36:16 +0100 |
| commit | 0e7e811f0b1080119e1057a084a94d2ef22cfd06 (patch) | |
| tree | 5bf3e72dd6eb40679861641311d1449a250a7497 | |
| parent | 936b80fdb0544ea950e06e84e72cae5e7a29fdde (diff) | |
| download | libguestfs-0e7e811f0b1080119e1057a084a94d2ef22cfd06.tar.gz libguestfs-0e7e811f0b1080119e1057a084a94d2ef22cfd06.tar.xz libguestfs-0e7e811f0b1080119e1057a084a94d2ef22cfd06.zip | |
EPEL 5: Replace format6 with format4 in OCaml gettext routines.
| -rw-r--r-- | configure.ac | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/configure.ac b/configure.ac index 1b1c22f6..c684e244 100644 --- a/configure.ac +++ b/configure.ac @@ -786,14 +786,14 @@ EOF cat <<EOF >>$output module Gettext = struct external s_ : string -> string = "%identity" - external f_ : ('a, 'b, 'c, 'd, 'e, 'f) format6 - -> ('a, 'b, 'c, 'd, 'e, 'f) format6 + external f_ : ('a, 'b, 'c, 'd) format4 + -> ('a, 'b, 'c, 'd) format4 = "%identity" let sn_ : string -> string -> int -> string = fun s p n -> if n = 1 then s else p - let fn_ : ('a, 'b, 'c, 'd, 'e, 'f) format6 - -> ('a, 'b, 'c, 'd, 'e, 'f) format6 - -> int -> ('a, 'b, 'c, 'd, 'e, 'f) format6 + let fn_ : ('a, 'b, 'c, 'd) format4 + -> ('a, 'b, 'c, 'd) format4 + -> int -> ('a, 'b, 'c, 'd) format4 = fun s p n -> if n = 1 then s else p end EOF |