&do_cmd_deprecated: New function.

Attempt to get \setindexsubitem{} handled at the right time under LaTeX2HTML
98.1; should still be fine under 97.1*.

diff --git a/Doc/myformat.perl b/Doc/myformat.perl
index da9dbd1a84f15e27a6bc7fa446f59d34b6e5e258..1a18e84860d00f30d4a1f759103c1a0df2149d1e 100644 (file)
--- a/Doc/myformat.perl
+++ b/Doc/myformat.perl
@@ -150,6 +150,17 @@ sub do_cmd_strong{
     $_;
 }
 
+sub do_cmd_deprecated{
+    # two parameters:  \deprecated{version}{whattodo}
+    local($_) = @_;
+    local($any_next_pair_pr_rx3) = "$OP(\\d+)$CP([\\s\\S]*)$OP\\3$CP";
+    local($release,$action) = ($2, $4);
+    s/$next_pair_pr_rx$any_next_pair_pr_rx3//;
+    "<b>Deprecated since release $release.</b>"
+      . "\n$action<p>"
+      . $_;
+}
+
 # file and samp are at the end of this file since they screw up fontlock.
 
 # index commands
@@ -166,6 +177,9 @@ sub do_cmd_setindexsubitem{
     $INDEX_SUBITEM = $2;
     $_;
 }
+if (defined &process_commands_wrap_deferred) {
+    &process_commands_wrap_deferred("setindexsubitem \# {}\n");
+}
 
 sub do_cmd_indexii{
     local($_) = @_;