~percona-toolkit-dev/percona-toolkit/pxc-autodiscover-nodes

« back to all changes in this revision

Viewing changes to util/write-user-docs

  • Committer: Brian Fraser
  • Date: 2013-03-20 17:11:13 UTC
  • Revision ID: brian.fraser@percona.com-20130320171113-nj85ri9r9455elw3
Fixed a typo in write-user-docs

Show diffs side-by-side

added added

removed removed

Lines of Context:
73
73
      my $tool = basename($f);
74
74
      $tool    =~ s/\.html//;
75
75
      my $out = do { open my $fh, q{<}, $f or die "$f: $!"; local $/; <$fh> };
 
76
      warn $out;
76
77
      $out =~ s{
77
78
\Q<dt id="\E(cmdoption-$tool--)\Q">\E\s*
78
79
\Q<tt class="descname">--</tt><tt class="descclassname">\E([^<]+)
80
81
}{<dt id="$1$2">
81
82
<tt class="descname">--$2</tt><tt class="descclassname"></tt><a class="headerlink" href="#$1$2"}xg;
82
83
      open my $fh, q{>}, $f or die "Cannot open $f for writing: $!";
83
 
      print { $f } $out;
 
84
      print { $fh } $out;
84
85
      close $fh or die "Cannot close $f: $!";
85
86
   ' "$RST_DIR/html/$name.html"
86
87
}