This is an automated email from the git hooks/post-receive script.
glondu pushed a commit to branch master
in repository lablgtk-extras.
commit 4adc1b270704d1d1909aefd117c53aec0ff92784
Author: Stephane Glondu <st...@glondu.net>
Date: Thu Feb 26 09:44:08 2015 +0100
Imported Upstream version 1.5
---
configure | 2 +-
configure.ac | 2 +-
src/META | 4 ++--
src/Makefile | 2 +-
src/configwin_ihm.ml | 12 +++++++-----
5 files changed, 12 insertions(+), 10 deletions(-)
diff --git a/configure b/configure
index 16e5476..098462e 100755
--- a/configure
+++ b/configure
@@ -1694,7 +1694,7 @@ ac_compiler_gnu=$ac_cv_c_compiler_gnu
-VERSION=1.4
+VERSION=1.5
PACKAGE_NAME=lablgtk2-extras
# The root directory where we will compile
diff --git a/configure.ac b/configure.ac
index b450751..26bf046 100644
--- a/configure.ac
+++ b/configure.ac
@@ -27,7 +27,7 @@
# check for one particular file of the sources
AC_INIT(master.Makefile.in)
-VERSION=1.4
+VERSION=1.5
PACKAGE_NAME=lablgtk2-extras
# The root directory where we will compile
diff --git a/src/META b/src/META
index 0521046..e372939 100644
--- a/src/META
+++ b/src/META
@@ -1,12 +1,12 @@
description = "Additional libraries for Lablgtk2"
requires = "unix,xmlm,lablgtk2,config-file,lablgtk2.sourceview2"
-version = "1.4"
+version = "1.5"
archive(byte) = "lablgtkextras.cma"
archive(native) = "lablgtkextras.cmxa"
package "configwin" (
- version = "1.1"
+ version = "1.5"
description = "Easy build of configuration window with GTK"
requires = "lablgtk2-extras"
archive(byte) = "configwin.cma"
diff --git a/src/Makefile b/src/Makefile
index 8c57bc0..a7d9a42 100644
--- a/src/Makefile
+++ b/src/Makefile
@@ -29,7 +29,7 @@ include ../master.Makefile
PACKAGES=config-file,lablgtk2.sourceview2,xmlm
OF_FLAGS= -package $(PACKAGES)
-COMPFLAGS=-annot -g -warn-error A
+COMPFLAGS=-annot -g -warn-error A-3
GELIB_CMOFILES= \
gtke_version.cmo \
diff --git a/src/configwin_ihm.ml b/src/configwin_ihm.ml
index 8eb7bea..0e1166f 100644
--- a/src/configwin_ihm.ml
+++ b/src/configwin_ihm.ml
@@ -496,11 +496,13 @@ class color_param_box param (tt:GData.tooltips) =
let g = (Gdk.Color.green color)in
let b = (Gdk.Color.blue color) in
let s = Printf.sprintf "#%4X%4X%4X" r g b in
- let _ =
- for i = 1 to (String.length s) - 1 do
- if s.[i] = ' ' then s.[i] <- '0'
- done
- in
+ let s = String.mapi
+ (fun i -> function
+ ' ' when i >= 1 -> '0'
+ | c -> c
+ )
+ s
+ in
we#set_text s ;
dialog#destroy ()
)
--
Alioth's /usr/local/bin/git-commit-notice on
/srv/git.debian.org/git/pkg-ocaml-maint/packages/lablgtk-extras.git
_______________________________________________
Pkg-ocaml-maint-commits mailing list
Pkg-ocaml-maint-commits@lists.alioth.debian.org
http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-ocaml-maint-commits
