ruby: Use a regular C array to pass the arguments through rb_rescue.
[libguestfs.git] / generator / generator_docstrings.ml
index 44f92c0..baccdd6 100644 (file)
@@ -30,7 +30,7 @@ let progress_message =
   "This long-running command can generate progress notification messages
 so that the caller can display a progress bar or indicator.
 To receive these messages, the caller must register a progress
   "This long-running command can generate progress notification messages
 so that the caller can display a progress bar or indicator.
 To receive these messages, the caller must register a progress
-callback.  See L<guestfs(3)/guestfs_set_progress_callback>."
+event callback.  See L<guestfs(3)/GUESTFS_EVENT_PROGRESS>."
 
 let protocol_limit_warning =
   "Because of the message protocol, there is a transfer limit
 
 let protocol_limit_warning =
   "Because of the message protocol, there is a transfer limit
@@ -40,17 +40,17 @@ let danger_will_robinson =
   "B<This command is dangerous.  Without careful use you
 can easily destroy all your data>."
 
   "B<This command is dangerous.  Without careful use you
 can easily destroy all your data>."
 
-let deprecation_notice flags =
+let deprecation_notice ?(prefix = "") flags =
   try
     let alt =
       find_map (function DeprecatedBy str -> Some str | _ -> None) flags in
     let txt =
   try
     let alt =
       find_map (function DeprecatedBy str -> Some str | _ -> None) flags in
     let txt =
-      sprintf "This function is deprecated.
-In new code, use the C<%s> call instead.
+      sprintf "I<This function is deprecated.>
+In new code, use the L</%s%s> call instead.
 
 Deprecated functions will not be removed from the API, but the
 fact that they are deprecated indicates that there are problems
 
 Deprecated functions will not be removed from the API, but the
 fact that they are deprecated indicates that there are problems
-with correct use of these functions." alt in
+with correct use of these functions." prefix alt in
     Some txt
   with
     Not_found -> None
     Some txt
   with
     Not_found -> None