$OpenBSD: patch-rpm_hdlists_ml,v 1.1 2015/08/30 15:56:12 avsm Exp $
--- rpm/hdlists.ml.orig	Tue Nov 18 11:42:46 2014
+++ rpm/hdlists.ml	Mon Aug  3 18:07:28 2015
@@ -15,7 +15,7 @@
 open ExtLib
 open Common
 
-include Util.Logging(struct let label = __FILE__ end) ;;
+include Util.Logging(struct let label = "rpm/hdlists.ml" end) ;;
 
 let progressbar = Util.Progress.create "Rpm.Parse.Hdlists.parse_822_iter" ;;
 Util.Progress.set_total progressbar 8000 (* estimate *) ;
