X-Git-Url: https://git.phdru.name/?a=blobdiff_plain;f=hotexplode.pl;h=2273b2fec714e0bf9d4c0d4b5b26f1cc7c48c1dc;hb=9edef5a570ea28f7c06d8d92fdd70afe0ea86809;hp=4f3e8459479ff529f18420acfe685953a340ff3e;hpb=fb5c3b2b91aeeb615d6d6d890491af3fdff69556;p=bookmarks_db.git diff --git a/hotexplode.pl b/hotexplode.pl index 4f3e845..2273b2f 100755 --- a/hotexplode.pl +++ b/hotexplode.pl @@ -1,6 +1,6 @@ #!/usr/bin/perl -# hotexplode -- a program for "exploding" a xmosaic hotlist or Netscape +# hotexplode -- a program for "exploding" a xmosaic hotlist or Netscape # bookmark file into a hierarchial multi-page structure. # acb 60 Chs 3162 @@ -11,25 +11,25 @@ $date = `date`; # customise below -# header: some arbitrary HTML text which is appended below the title and +# header: some arbitrary HTML text which is appended below the title and # above the hotlist data $header = <

-This hotlist was generated with +This hotlist was generated with hotexplode on $date.
-WARNING: The inclusion of a link to a page on -this hotlist is not an indication of the maintainer's +WARNING: The inclusion of a link to a page on +this hotlist is not an indication of the maintainer's approval of or agreement with its content.

-Please DO NOT bookmark this page. Bookmark +Please DO NOT bookmark this page. Bookmark the main page instead. -Any other page in the hierarchy may disappear at any time. +Any other page in the hierarchy can disappear at any time.

FOO @@ -65,7 +65,7 @@ $title = $opt_t if $opt_t; while (<>) { - if(/

/) { warn "Detected Netscape bookmark format\n" if $opt_v; &parse_netscape_bookmarks($outdir, $title); last; } @@ -80,11 +80,14 @@ sub parse_mosaic_hotlist { # we write the file at the very end, because (I think) filehandles do # not have local scope, and this is recursive local($prefix, $title) = @_; - local($result) = "$title \ -\n

$title

\n $header \n

$title

"; + local($result) = "\ +\ +$title\ +\ +\n

$title

\n $header \n

${subtitle}\n"; unless("$desc" eq "") { $result = $result . $desc; } - &parse_netscape_bookmarks("${prefix}/${filename}", + &parse_netscape_bookmarks("${prefix}/${filename}", "${title}:${subtitle}"); next; }