From 2b039e21cc3a166dd42c99967a5adfae35219a1e Mon Sep 17 00:00:00 2001
From: herbelin
Date: Thu, 13 Jan 2005 16:44:00 +0000
Subject: Amélioration message Locate

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@6583 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 parsing/prettyp.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/parsing/prettyp.ml b/parsing/prettyp.ml
index 743036bcf5..7df78fe61c 100644
--- a/parsing/prettyp.ml
+++ b/parsing/prettyp.ml
@@ -216,7 +216,7 @@ let print_located_qualid ref =
 	(fun (o,oqid) ->
 	  hov 2 (pr_located_qualid o ++
 	  (if oqid <> qid then
-	    spc() ++ str "(shorter name to refer to it is " ++ pr_qualid oqid ++ str")"
+	    spc() ++ str "(shorter name to refer to it in current context is " ++ pr_qualid oqid ++ str")"
 	  else
 	    mt ()))) l
 
-- 
cgit v1.2.3