]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/function-documentation.cc
* ChangeLog: Recode utf-8.
[lilypond.git] / lily / function-documentation.cc
index bfa68ec5465c33fbd0e54ffcc75480c9c557a36e..124d6b5539459a50de52c417dec7de5a8f74a2d0 100644 (file)
@@ -21,7 +21,7 @@ void ly_add_function_documentation (SCM func,
   if (!strlen (doc))
     return;
 
-  if (!scm_is_vector (doc_hash_table))
+  if (scm_hash_table_p (doc_hash_table) != SCM_BOOL_T)
     doc_hash_table = scm_c_make_hash_table (59);
 
   String s = String (" - ") + "LilyPond procedure: " + fname + " " + varlist