view release on metacpan or search on metacpan
libuv/src/win/tty.c view on Meta::CPAN
      /* Default background color */
      bg_color = uv_tty_default_bg_color;
      bg_bright = uv_tty_default_bg_bright;
    } else if (arg >= 90 && arg <= 97) {
      /* Set bold foreground color */
      fg_bright = 1;
      fg_color = arg - 90;
    } else if (arg >= 100 && arg <= 107) {
      /* Set bold background color */
      bg_bright = 1;
      bg_color = arg - 100;
    }
  }
view release on metacpan or search on metacpan
#ifndef IVSIZE
#  ifdef LONGSIZE
#    define IVSIZE LONGSIZE
#  else
#    define IVSIZE 4 /* A bold guess, but the best we can make. */
#  endif
#endif
#ifndef UVTYPE
#  define UVTYPE                         unsigned IVTYPE
#endif
view release on metacpan or search on metacpan
lib/AlignDB/ToXLSX.pm view on Meta::CPAN
        size => $self->{font_size},
    );
    my %header = (
        align    => 'center',
        bg_color => 42,
        bold     => 1,
        bottom   => 2,
    );
    my $format = {
        HEADER => $workbook->add_format( %header, %font, ),
        HIGHLIGHT => $workbook->add_format( color => 'blue',  %font, ),
        NORMAL    => $workbook->add_format( color => 'black', %font, ),
        NAME      => $workbook->add_format( bold  => 1,       color => 57, %font, ),
        TOTAL     => $workbook->add_format( bold  => 1,       top => 2, %font, ),
        DATE => $workbook->add_format(
            align      => 'left',
            bg_color   => 42,
            bold       => 1,
            num_format => 'yyyy-mm-dd hh:mm',
            %font,
        ),
        URL       => $workbook->add_format( color => 'blue', underline => 1, %font, ),
        URLHEADER => $workbook->add_format( color => 'blue', underline => 1, %header, %font, ),
view release on metacpan or search on metacpan
lib/CWB/CEQL/Parser.pm view on Meta::CPAN
The B<HtmlErrorMessage> method will automatically convert HTML metacharacters
and non-ASCII characters to entities, so it is safe to include the returned
HTML code directly in a Web page.  Error messages may use basic wiki-style
formatting: C<''...''> for typewriter font, C<//...//> for italics and
C<**...**> for bold font.  Note that such markup is non-recursive and nested
formatting will be ignored.  User input should always be enclosed in
C<''...''> in error messages so that C<//> and C<**> sequences in the input
are not mistaken as formatting instructions.
=head2 Calling subrules
lib/CWB/CEQL/Parser.pm view on Meta::CPAN
of the callstack.  The string I<$html_code> is valid HTML and can directly be
included in a generated Web page.  In particular, unsafe and non-ASCII
characters have been encoded as HTML entities.  Simple, non-recursive
wiki-style markup in an error message is interpreted in the following way:
  **<text>**    <text> is shown in bold font (<b> ... </b>)
  //<text>//    <text> is displayed in italics (<i> ... </i>)
  ''<text>''    <text> is shown in typewriter font (<code> ... </code>)
Lines starting with C< - > (note the two blanks) are converted into list items.
lib/CWB/CEQL/Parser.pm view on Meta::CPAN
=over 4
=item *
C<< **<text>** >> - <text> is displayed in bold face (C<< <b> ... </b> >>)
=item *
C<< //<text>// >> - <text> is displayed in italics (C<< <i> ... </i> >>)
lib/CWB/CEQL/Parser.pm view on Meta::CPAN
=back
The wiki markup is non-recursive, i.e. no substitutions will be applied to
the text wrapped in C<''...''> etc.  This behaviour is intentional, so that
e.g. B<**> in a query expression will not be mistaken for a bold face marker,
(as long as the query is displayed in typewriter font, i.e. as C<''<query>''>).
=cut
sub formatHtmlText {
view release on metacpan or search on metacpan
#ifndef IVSIZE
#  ifdef LONGSIZE
#    define IVSIZE LONGSIZE
#  else
#    define IVSIZE 4 /* A bold guess, but the best we can make. */
#  endif
#endif
#ifndef UVTYPE
#  define UVTYPE                         unsigned IVTYPE
#endif
view release on metacpan or search on metacpan
#ifndef IVSIZE
#  ifdef LONGSIZE
#    define IVSIZE LONGSIZE
#  else
#    define IVSIZE 4 /* A bold guess, but the best we can make. */
#  endif
#endif
#ifndef UVTYPE
#  define UVTYPE                         unsigned IVTYPE
#endif
view release on metacpan or search on metacpan
mason/alzabo.css view on Meta::CPAN
  text-decoration: none;
}
strong, b
{
  font-weight: bold;
}
p
{
  color: #333;
mason/alzabo.css view on Meta::CPAN
{
  color: #A80806;
  font-family: verdana, arial, helvetica, sans-serif;
  font-size: 12px;
  line-height: 18px;
  font-weight: bold;
  margin-top: 0;
  margin-bottom: 0;
}
h3
mason/alzabo.css view on Meta::CPAN
{
  color: #333;
  font-family: verdana, arial, helvetica, sans-serif;
  font-size: 10px;
  line-height: 18px;
  font-weight: bold;
  margin-top: 0;
  margin-bottom: 0;
}
h4.error { color:red; }
mason/alzabo.css view on Meta::CPAN
  color: #A80806;
  font-family: verdana, arial, helvetica, sans-serif;
  font-size: 10px;
  text-align: right;
  line-height: 24px;
  font-weight: bold;
  margin-top: 0;
  margin-bottom: 0;
}
h7
{
  color: #333;
  font-family: verdana, arial, helvetica, sans-serif;
  font-size: 10px;
  line-height: 10px;
  font-weight: bold;
  margin-top: 0;
  margin-bottom: 0;
}
#top
view release on metacpan or search on metacpan
lib/Amazon/SES.pm view on Meta::CPAN
    unless ( $r->is_success ) {
        die $r->error_message;
    }
If you don't have MIME::Entity instance handy you may use the following arguments to have AWS SES build the message for you (bold entries are required): C<From>, B<To>, B<Subject>, B<Body>, C<Body_html>, C<ReturnPath>. To send e-mail to multiple emai...
If C<From> is missing it defaults to your default e-mail given to C<new()>. Remember: this must be a verified e-mail. Example:
    $r = $ses->send(
        from    => '[your email address]',
view release on metacpan or search on metacpan
share/Templates/Templates/XSLT+DOJO/incDojo_JS_Css.xsl view on Meta::CPAN
		font-size: 1.1em;
		font-family: Geneva, Arial, Helvetica, sans-serif;
	}
	.heading {
		font-weight: bold;
		padding-bottom: 0.25em;
	}
</style>
<script>
view release on metacpan or search on metacpan
factpacks/Linux.fact view on Meta::CPAN
devfs patch => <reply> $who, Device FileSystem for Linux kernel. URL: http://www.atnf.csiro.au/~rgooch/linux/kernel-patches.html
devo => <reply> $who, Perl script to convert MS Windows themes to KDE themes. URL: http://www.circle-path.org/garrett/tech/devo.html
dfcolor => <reply> $who, Colourized df with graph and monitoring option. URL: http://www.macroshaft.org/iggie/scripts/ugh/site/
dfm => <reply> $who, Filemanager like OS/2 WPS. URL: http://dfm.linuxbox.com/
DForum => <reply> $who, a simple website discussion forum written in Perl. URL: http://www.dansteinman.com/dforum/
DGen/SDL => <reply> $who, DGen Sega Genesis emulator, ported to SDL. URL: http://www.humboldt1.com/~ognir/dgen-sdl.html
DGPS => <reply> $who, Real time and post processed DGPS software. URL: http://www.wombat.ie/gps/
Dharma ODBC SDK => <reply> $who, Linux based ODBC software development kit (SDK). URL: http://www.dharma.com/
DHARMI => <reply> $who, Tinker-toy like modelling language featuring living data. URL: http://www.erols.com/panda
DHCP with Dynamic DNS => <reply> $who, Dynamically update DNS from dhcpd.leases file. URL: http://cpl.net/~carville/DHCP-DNS/dhcp-dns.html
dhcp-dns => <reply> $who, Update DNS with data from DHCPD. URL: http://www.sector13.org/kazin/projects/dhcp_dns.html
factpacks/Linux.fact view on Meta::CPAN
konkhydra => <reply> $who, Konkhydra is a program that lets you control multiple X servers from one keyboard and mouse. URL: http://www.konkers.net/~konkers/konkhydra/konkhydra-0.0.1.tar.gz
Gift => <reply> $who, Gift is a Java platform which allows developers to create custom editors dedicated to any representation language or formalism. URL: http://www.xrce.xerox.com/ats/gift/download/download.html
CodeGuide => <reply> $who, CodeGuide is an IDE that detects errors in your code as you type, offers powerful code completion features, maintains a structured view of your program, has an integrated visual debugger, supports the latest Java technologi...
Koala Complete MUD Server => <reply> $who, Koala is a complete, IPv6-compliant MUD server.. URL: http://sourceforge.net/project/filelist.php?form_grp=312
JIPSY => <reply> $who, Jipsy is a drop-in replacement for parts of the java.net classes that enables Java applications to seamlessly communicate using IPv4 and IPv6. URL: http://www.progsoc.uts.edu.au/~mpf/jipsy/jipsy-0.1.0.tar.gz
Style-print => <reply> $who, Style-print is a small program that prints files with a lot of styles like underline, bold, double width, superindex, etc. URL: http://www.ctv.es/USERS/pbrufal/style-print-0.1.tar.gz
Updee => <reply> $who, Updee is an uptime daemon designed to run on as many UNIX systems as possible. URL: http://www.bigfoot.com/~iretd/updee-current.tar.gz
gShield => <reply> $who, gShield (formerly Godot's Modified Modular Firewall), is an aggressive, modular, ipchains-based firewall script. URL: http://muse.linuxgeek.org/files/gShield-1.0.tgz
tdof => <reply> $who, tdof is an APE-derived C++ framework for use in developing telephony applications with native drivers which lack a pre-existing SDK. URL: ftp://www.voxilla.org/pub/tdof/
gg => <reply> $who, gg is a graphical guestbook for the Web. URL: http://www.earth.li/projectpurple/files/gg-0.0.2.tar.gz
ODBC Socket Server => <reply> $who, ODBC Socket Server is an open source database access toolkit that exposes Windows NT ODBC data sources via an XML-based TCP/IP interface. URL: http://odbc.linuxbox.com/download.html
view release on metacpan or search on metacpan
inc/Pod/Markdown.pm view on Meta::CPAN
        if $seq_command eq 'L' && $self->_private->{InsideLink};
    my $i = 2;
    my %interiors = (
        'I' => sub { return '_'  . $_[$i] . '_'  },      # italic
        'B' => sub { return '__' . $_[$i] . '__' },      # bold
        'C' => sub { return '`'  . $_[$i] . '`'  },      # monospace
        'F' => sub { return '`'  . $_[$i] . '`'  },      # system path
        # non-breaking space
        'S' => sub {
            (my $s = $_[$i]) =~ s/ / /g;
view release on metacpan or search on metacpan
lib/Amon2/Setup/Asset/Blueprint.pm view on Meta::CPAN
h1, h2, h3, h4, h5, h6 {font-weight:normal;color:#111;}
h1 {font-size:3em;line-height:1;margin-bottom:0.5em;}
h2 {font-size:2em;margin-bottom:0.75em;}
h3 {font-size:1.5em;line-height:1;margin-bottom:1em;}
h4 {font-size:1.2em;line-height:1.25;margin-bottom:1.25em;}
h5 {font-size:1em;font-weight:bold;margin-bottom:1.5em;}
h6 {font-size:1em;font-weight:bold;}
h1 img, h2 img, h3 img, h4 img, h5 img, h6 img {margin:0;}
p {margin:0 0 1.5em;}
.left {float:left !important;}
p .left {margin:1.5em 1.5em 1.5em 0;padding:0;}
.right {float:right !important;}
p .right {margin:1.5em 0 1.5em 1.5em;padding:0;}
a:focus, a:hover {color:#09f;}
a {color:#06c;text-decoration:underline;}
blockquote {margin:1.5em;color:#666;font-style:italic;}
strong, dfn {font-weight:bold;}
em, dfn {font-style:italic;}
sup, sub {line-height:0;}
abbr, acronym {border-bottom:1px dotted #666;}
address {margin:0 0 1.5em;font-style:italic;}
del {color:#666;}
lib/Amon2/Setup/Asset/Blueprint.pm view on Meta::CPAN
li ul, li ol {margin:0;}
ul, ol {margin:0 1.5em 1.5em 0;padding-left:1.5em;}
ul {list-style-type:disc;}
ol {list-style-type:decimal;}
dl {margin:0 0 1.5em 0;}
dl dt {font-weight:bold;}
dd {margin-left:1.5em;}
table {margin-bottom:1.4em;width:100%;}
th {font-weight:bold;}
thead th {background:#c3d9ff;}
th, td, caption {padding:4px 10px 4px 5px;}
tbody tr:nth-child(even) td, tbody tr.even td {background:#e5ecf9;}
tfoot {font-style:italic;}
caption {background:#eee;}
lib/Amon2/Setup/Asset/Blueprint.pm view on Meta::CPAN
.last {margin-right:0;padding-right:0;}
.top {margin-top:0;padding-top:0;}
.bottom {margin-bottom:0;padding-bottom:0;}
/* forms.css */
label {font-weight:bold;}
fieldset {padding:0 1.4em 1.4em 1.4em;margin:0 0 1.5em 0;border:1px solid #ccc;}
legend {font-weight:bold;font-size:1.2em;margin-top:-0.2em;margin-bottom:1em;}
fieldset, #IE8#HACK {padding-top:1.4em;}
legend, #IE8#HACK {margin-top:0;margin-bottom:0;}
input[type=text], input[type=password], input[type=url], input[type=email], input.text, input.title, textarea {background-color:#fff;border:1px solid #bbb;color:#000;}
input[type=text]:focus, input[type=password]:focus, input[type=url]:focus, input[type=email]:focus, input.text:focus, input.title:focus, textarea:focus {border-color:#666;}
select {background-color:#fff;border-width:1px;border-style:solid;}
view release on metacpan or search on metacpan
lib/Anki/Import.pm view on Meta::CPAN
    }
    $field = join '`', @$parts;
    # backticked characters
    $field =~ s/(?<!\\)`(.*?)`/<span style="font-family: courier; weight: bold;">$1<\/span>/gm;
    $field =~ s/\\`/`/g;
    # bold
    $field =~ s/(?<!\\)\*(.*?)\*/<span style="weight: bold;">$1<\/span>/gm;
    $field =~ s/\\\*/*/g;
    # unordered lists
    $field =~ s'(?<!\\)%(.*?)%'"<ul><li>" . join ("</li><li>", (split (/,\s*/, $1))) . "</li><\/ul>"'gme;
    $field =~ s/\\%/%/g;
lib/Anki/Import.pm view on Meta::CPAN
Learning how to format the source file is key to getting Anki to import your
notes properly and getting the most out of C<Anki::Import>.
Following a few simple rules, you can assign notes to a note type, preserve
whitespace in fields, create bold text, create blank lines in your fields,
add tags, create cloze deletions, indicate which fields are blank and
generate simple lists. Study the example below for details.
Note: Lines containing only whitespace characters are treated as blank lines.
lib/Anki/Import.pm view on Meta::CPAN
    Another question                     # Field 1
    `                                    # Field 2 is blank.
    This is *in bold*                    # Field 3 has bold words, followed by a
    `                                    # blank line, followed by
    %an,unordered,list%                  # an ordered list.
    new_tags more_new_tags               # This and future notes will use these
    ^                                    # newer automated tags.
view release on metacpan or search on metacpan
p.desc, td.links, a {
  line-height: 17pt;
}
thead tr td {
  align: left;
  font-weight: bold;
  font-style: italic;
}
a {
  font-weight: bold;
  text-decoration: none;
  aborder-bottom: 1px dotted white;
}
a:hover {
  font-weight: bold;
  text-decoration: underline;
  atext-decoration: none;
  aborder-bottom: 1px solid white;
}
</style>
view release on metacpan or search on metacpan
lib/AnnoCPAN/DBI.pm view on Meta::CPAN
    # union of all the notes/podvers
    push @notes,   $self->notes;
    push @podvers, $self->podvers;
    # boldly translate the notes to where they have never been before
    for my $note (@notes) {
        for my $podver (@podvers) {
            my ($np) = AnnoCPAN::DBI::NotePos->search_podver_note(
                $podver, $note);
            unless ($np) {
view release on metacpan or search on metacpan
src/ppport.h view on Meta::CPAN
#ifndef IVSIZE
#  ifdef LONGSIZE
#    define IVSIZE LONGSIZE
#  else
#    define IVSIZE 4 /* A bold guess, but the best we can make. */
#  endif
#endif
#ifndef UVTYPE
#  define UVTYPE                         unsigned IVTYPE
#endif
view release on metacpan or search on metacpan
lib/Antsy.pm view on Meta::CPAN
=head1 SYNOPSIS
	use Antsy qw(:all);
	print bold, underline, text_red, "Hello", reset;
=head1 DESCRIPTION
Subroutines to deal with ANSI terminal sequences. You can emit these
without knowing what's coming up.
lib/Antsy.pm view on Meta::CPAN
=item * blink
Make the text blink (however your terminal does that).
=item * bold
Turn on bold
=item * clear_line
=item * clear_screen
lib/Antsy.pm view on Meta::CPAN
BEGIN {
	my @groups = (
		# EXPORT_TAG  SUB_NAME  COMMAND ARGS
		[ qw( control reset          m    0 ) ],
		[ qw( text    bold           m    1 ) ],
		[ qw( text    dark           m    2 ) ],
		[ qw( text    italic         m    3 ) ],
		[ qw( text    underline      m    4 ) ],
		[ qw( text    blink          m    5 ) ],
		[ qw( text    reverse        m    7 ) ],
lib/Antsy.pm view on Meta::CPAN
# OSC 1337 ; CopyToClipboard=[clipboard name] ST
# OSC 1337 ; EndCopy ST
=item * change_color_palette
[key] gives the color to change. The accepted values are: fg bg bold link selbg selfg curbg curfg underline tab" black red green yellow blue magenta cyan white br_black br_red br_green br_yellow br_blue br_magenta br_cyan br_white
[value] gives the new color. The following formats are accepted:
RGB (three hex digits, like fff)
RRGGBB (six hex digits, like f0f0f0)
view release on metacpan or search on metacpan
lib/AnyEvent/MSN.pm view on Meta::CPAN
CS and is closest to the category specified in PF. If those parameters are not
present, the client should just use a default font.
=item EF
Specifies optional style effects. Possible effects are bold, italic,
underline, and strikethrough. Each effect is referred to by its first letter.
For example, to make bold-italic text, include the parameter C<EF=IB> or
C<EF=BI>. The order does not matter. Any unknown effects are to be ignored.
If there are no effects, just leave the parameter value blank.
=item CO
view release on metacpan or search on metacpan
#ifndef IVSIZE
#  ifdef LONGSIZE
#    define IVSIZE LONGSIZE
#  else
#    define IVSIZE 4 /* A bold guess, but the best we can make. */
#  endif
#endif
#ifndef UVTYPE
#  define UVTYPE                         unsigned IVTYPE
#endif
view release on metacpan or search on metacpan
#ifndef IVSIZE
#  ifdef LONGSIZE
#    define IVSIZE LONGSIZE
#  else
#    define IVSIZE 4 /* A bold guess, but the best we can make. */
#  endif
#endif
#ifndef UVTYPE
#  define UVTYPE                         unsigned IVTYPE
#endif
view release on metacpan or search on metacpan
inc/Pod/Markdown.pm view on Meta::CPAN
sub interior_sequence {
    my ($seq_command, $seq_argument, $pod_seq) = @_[1..3];
    my %interiors = (
        'I' => sub { return '_' . $_[1] . '_' },      # italic
        'B' => sub { return '__' . $_[1] . '__' },    # bold
        'C' => sub { return '`' . $_[1] . '`' },      # monospace
        'F' => sub { return '`' . $_[1] . '`' },      # system path
        'S' => sub { return '`' . $_[1] . '`' },      # code
        'E' => sub {
            my $charname = $_[1];
view release on metacpan or search on metacpan
share/basic/EPUB/styles/style.css view on Meta::CPAN
div.keigakomi{padding-top: 0.5em;
              padding-bottom: 0.5em;
              padding-right: 0.5em;
              padding-left: 1em;}
.futoji { font-weight: bold;}
.shatai { font-style: italic;}
.sesame_dot {
    font-style: normal;
    text-emphasis-style: filled sesame;
view release on metacpan or search on metacpan
 :) Paul Linder, who is Mr. Clean... not just the code, its faster too !
    Boy was that just the beginning.  Work with him later facilitated better
    session management and XMLSubsMatch custom tag technology.
 :) Russell Weiss, for being every so "strict" about his code.
 :) Bill McKinnon, who understands the finer points of running a web site.
 :) Richard Rossi, for his need for speed & boldly testing dynamic includes.
 :) Greg Stark, for endless enthusiasm, pushing the module to its limits.
 :) Marc Spencer, who brainstormed dynamic includes.
 :) Doug Silver, for finding most of the bugs.
 :) Darren Gibbons, the biggest cookie-monster I have ever known.
 :) Ken Williams, for great teamwork bringing full SSI to the table
 :) Lincoln Stein, for his blessed CGI.pm module
 :) Michael Rothwell, for his love of Session hacking
 :) Francesco Pasqualini, for bringing ASP to CGI
 :) Bryan Murphy, for being a PerlScript wiz
 :) Lupe Christoph, for his immaculate and stubborn testing skills
 :) Ryan Whelan, for boldly testing on Unix in the early infancy of ASP
=head1 SUPPORT
=head2 COMMUNITY
view release on metacpan or search on metacpan
examples/htdocs/login.html view on Meta::CPAN
    .logintext
    {
    font-family: Verdana, Arial, Helvetica, sans-serif;
    font-size: x-small;
    font-weight: bold;
    }
    .textbox
    {
    font-family: Verdana, Arial, Helvetica, sans-serif;
examples/htdocs/login.html view on Meta::CPAN
    .infonormal
    {
    font-family: Verdana, Arial, Helvetica, sans-serif;
    font-size: x-small;
    font-weight: bold;
    }
    .infored
    {
    font-family: Verdana, Arial, Helvetica, sans-serif;
    font-size: x-small;
    font-weight: bold;
    color: #cc0000;
    }
    td.infoboxbot
    {
view release on metacpan or search on metacpan
dtds/dialog.dtd view on Meta::CPAN
                    dlg:font-charset (ansi|mac|ibmpc_437|ibmpc_850|ibmpc_860|ibmpc_861|ibmpc_863|ibmpc_865|system|symbol) #IMPLIED
                    dlg:font-pitch (fixed|variable) #IMPLIED
                    dlg:font-charwidth %numeric; #IMPLIED
                    dlg:font-weight %numeric; #IMPLIED
                    dlg:font-slant (oblique|italic|reverse_oblique|reverse_italic) #IMPLIED
                    dlg:font-underline (single|double|dotted|dash|longdash|dashdot|dashdotdot|smallwave|wave|doublewave|bold|bolddotted|bolddash|boldlongdash|bolddashdot|bolddashdotdot|boldwave) #IMPLIED
                    dlg:font-strikeout (single|double|bold|slash|x) #IMPLIED
                    dlg:font-orientation CDATA #IMPLIED
                    dlg:font-kerning %boolean; #IMPLIED
                    dlg:font-wordlinemode %boolean; #IMPLIED
                    dlg:font-type (raster|device|scalable) #IMPLIED
                    >
view release on metacpan or search on metacpan
                $text = reverse $text;
                $text =~ s/>il\/</>lu\/<>il\/</;
                $text = reverse $text;
        } # end it
 
        # bold?
        $text =~ s/\*([^*]+)\*/<b>$1<\/b>/g;	
	# blank lines -> <p>
	$text =~ s/^\s*$/\n<p>\n/mg;
The date can be in any format that Date::Manip likes. In vim I do :r!date
to add the date line.
Apache::Blog does some simple manipulation on the text. It will turn
lines which start with a * into bullet lists, and blank lines are turned
into <p> tags. You can also *bold* text. It doesn't highlight links or
anything. A more sophisticated text->html converter may be included in
the future.
The module can also allow comments on entries, for this to work properly
the webserver must have write access to the directory containing your
view release on metacpan or search on metacpan
htdocs/style.css view on Meta::CPAN
body { color: #111111; font-size: 10pt; font-family: Verdana, Helvetica, Arial; }
H1 { color: black;  font-size: 16pt; font-weight: bold; font-family: Helvetica, Arial; }
H2 { color: black;  font-size: 14pt; font-weight: bold; font-family: Helvetica, Arial; }
H3 { color: black; font-size: 12pt; font-family: Helvetica, Arial; }
PRE { color: black; font-size: 12pt; font-family: courier; }
TD { color: black; font-size: 10pt; font-family: Verdana, Helvetica, Arial; }
TH { color: white; font-size: 10pt; font-weight: bold; font-family: Verdana, Helvetica, Arial; }
TH A:visited { color: white; };
TH A:link { color: white; };
.menu { color: black; font-size: 10pt; font-family: Verdana, Helvetica, Arial; }
.submenu { color: black; font-size: 10pt; font-family: Verdana, Helvetica, Arial; }
.content { color: black; font-family: Verdana, Arial, Helvetica; }
view release on metacpan or search on metacpan
  - show cookies not enabled warning message 
  - alert user when trying to copy, or cut 0 selected files.
  - got rid of stringify & destringify functions as well as
    MIME::Base64 and Storable libs since they aren't used anymore.
  - added confirm dialog to 'go live!' button.
  - bold faced path location to make it more noticable.
  
0.05  Tues Jun 25 08:00:00 2002 Philip Collins
  - fixed javascript checkbox array bug occuring when only 0 or 1 files 
    were in a single directory.
  - copy/cut buffer now is erased after pasting files.
view release on metacpan or search on metacpan
#ifndef IVSIZE
#  ifdef LONGSIZE
#    define IVSIZE LONGSIZE
#  else
#    define IVSIZE 4 /* A bold guess, but the best we can make. */
#  endif
#endif
#ifndef UVTYPE
#  define UVTYPE                         unsigned IVTYPE
#endif
view release on metacpan or search on metacpan
  my $indent = 3.0;
  my @components = split '/',$uri;
  unshift @components,'' unless @components;
  my ($path,$links) = ('',br());
  my $current_style = "line-height: 1.2; font-weight: bold; color: red;";
  my $parent_style  = "line-height: 1.2; font-weight: bold;";
  for (my $c=0; $c < @components-1; $c++) {
    $path .= escape($components[$c]) ."/";
    my $idt = $c * $indent;
    my $l = a({-href=>$path},$components[$c] || ($home.br({-clear=>'all'})));