From: Claudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Date: Wed, 20 Jul 2005 13:18:36 +0000 (+0000)
Subject: A "\n" is now prepended to the aliases that are inserted (to avoid the
X-Git-Tag: V_0_7_2~150
X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=c7b93cb79b6ba6886bfbd6260ee4c8e4a160776e;p=helm.git

A "\n" is now prepended to the aliases that are inserted (to avoid the
creation of horrible long lines).
---

diff --git a/helm/matita/matitaScript.ml b/helm/matita/matitaScript.ml
index 4425d1021..bd0441bc3 100644
--- a/helm/matita/matitaScript.ml
+++ b/helm/matita/matitaScript.ml
@@ -130,7 +130,7 @@ let eval_with_engine guistuff status user_goal parsed_text st =
     if DisambiguateTypes.Environment.is_empty new_aliases then
       parsed_text
     else
-      prepend_text (DisambiguatePp.pp_environment new_aliases)
+      prepend_text ("\n" ^ DisambiguatePp.pp_environment new_aliases)
         parsed_text
   in
   let new_text =