$OpenBSD: patch-src_gFile_ml,v 1.1 2013/06/18 09:27:37 dcoppa Exp $

commit 1a609406b916016bdb1e81971db1d649c857a76a
Author: Jacques Garrigue <garrigue@math.nagoya-u.ac.jp>
Date:   Tue Feb 19 09:17:06 2013 +0900

fix compatibility with ocaml 4.01

--- src/gFile.ml.orig	Thu Aug 23 12:37:48 2012
+++ src/gFile.ml	Tue Jun 18 10:15:53 2013
@@ -179,7 +179,7 @@ let chooser_widget ~action ?backend ?packing ?show () 
 	 FileChooser.P.file_system_backend backend
 	 [ Gobject.param FileChooser.P.action action ]) in
   let o = new chooser_widget w in
-  GObj.pack_return o ?packing ?show
+  GObj.pack_return o ~packing ~show
 
 class chooser_button_signals obj = object
   inherit GContainer.container_signals_impl obj
