# HG changeset patch
# User wenzelm
# Date 869225736 -7200
# Node ID b894f4c13df5a393f614a0eb3cee716759da7c01
# Parent  df4d0dad2b4e96e86c14dcb25f1477a059f4d230
tuned warning;

diff -r df4d0dad2b4e -r b894f4c13df5 src/Pure/Thy/thy_read.ML
--- a/src/Pure/Thy/thy_read.ML	Fri Jul 18 13:35:15 1997 +0200
+++ b/src/Pure/Thy/thy_read.ML	Fri Jul 18 13:35:36 1997 +0200
@@ -717,7 +717,7 @@
           val theory_list =
             TextIO.openAppend (tack_on (!index_path) ".theory_list.txt")
               handle _ => (make_html := false;
-                           writeln ("Warning: Cannot write to " ^
+                           warning ("Cannot write to " ^
                                   (!index_path) ^ " while making HTML files.\n\
                                   \HTML generation has been switched off.\n\
                                   \Call init_html() from within a \