1.1 --- a/src/Pure/Isar/proof.ML	Sun Mar 26 20:11:12 2000 +0200
     1.2 +++ b/src/Pure/Isar/proof.ML	Sun Mar 26 20:12:28 2000 +0200
     1.3 @@ -329,7 +329,7 @@
     1.4        else [];
     1.5  
     1.6      val prts =
     1.7 -     [Pretty.str ("proof(" ^ mode_name mode ^ "): step " ^ string_of_int nr ^
     1.8 +     [Pretty.str ("proof (" ^ mode_name mode ^ "): step " ^ string_of_int nr ^
     1.9          (if ! verbose then ", depth " ^ string_of_int (length nodes div 2)
    1.10          else "")), Pretty.str ""] @
    1.11       (if null ctxt_prts then [] else ctxt_prts @ [Pretty.str ""]) @