diff options
| author |  ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2012-09-20 10:15:03 +0000 |
|---|---|---|
| committer | ppedrot <ppedrot@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2012-09-20 10:15:03 +0000 |
| commit | 5e8ebbc13909125093e2c7aa18e00cf30cad6362 (patch) | |
| tree | 4d481a836295cf249c91ea95d13da2bdc9fea83e /tactics | |
| parent | b5c67e49df6ba29c9bdb7ddd25703e87aa9f9be0 (diff) | |
Fixing Show Script issues.
Author: Daniel de Rauglaudre
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15821 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tactics')
| -rw-r--r-- | tactics/extraargs.ml4 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/extraargs.ml4 b/tactics/extraargs.ml4 index 7a47c51ee..33cbf1b2d 100644 --- a/tactics/extraargs.ml4 +++ b/tactics/extraargs.ml4 @@ -204,7 +204,7 @@ let pr_in_hyp pr_id (lo,concl) : Pp.std_ppcmds = | None,false -> str "in" ++ spc () ++ str "*" ++ spc () ++ str "|-" | Some l,_ -> str "in" ++ - pr_sequence pr_id l ++ + spc () ++ prlist_with_sep pr_comma pr_id l ++ match concl with | true -> spc () ++ str "|-" ++ spc () ++ str "*" | _ -> mt () |