ocaml 3.09 transition

[helm.git] / helm / metadata / extractor / meta_lex.l

diff --git a/helm/metadata/extractor/meta_lex.l b/helm/metadata/extractor/meta_lex.l
index a8621ea3848e46a90980bdefbfa5c0882c798d44..c4c23e847bbbf3def939bd99e522a15ed865a3c7 100644 (file)
--- a/helm/metadata/extractor/meta_lex.l
+++ b/helm/metadata/extractor/meta_lex.l
@@ -115,7 +115,8 @@ value                   [^"]+
                        position = MAINHYP;
                     else if (position == MAINHYP)
                         { position = INHYP;
-                          no_open_source++;};
+                          no_open_source = 1;}
+                    else if (position == INHYP) no_open_source++;
                    }
 
 "</decl>"          |