view release on metacpan or search on metacpan
dform, or dbrowser is started
0.129 2014-10-13 15:25 CEST
- WWW.pm: work on POD
- core/html.js, css/start.css: rework CSS code in light of
http://stackoverflow.com/questions/26339186/different-font-sizes-and-justifications-on-a-single-line
and get rid of several deprecated classes
- mfile-www/lib.js: tweak notices line
0.130 2014-10-13 15:52 CEST
- start.css: fix bug "#result element has fixed height, causing text to
view all matches for this distribution
view release on metacpan or search on metacpan
share/public_html/index.html view on Meta::CPAN
<head>
<style>
body {
color: #ababab;
background: #000;
font-family: Segoe UI, Helvetica, Arial, Sans-Serif;
}
h2 {
display: block;
font-size: 2em;
margin-block-start: 0.67em;
margin-block-end: 0.67em;
margin-inline-start: 0px;
margin-inline-end: 0px;
font-weight: bold;
}
</style>
</head>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/MaMGal/Formatter.pm view on Meta::CPAN
sub stylesheet
{
my $t = <<END;
table.index { width: 100% }
.entry_cell { text-align: center }
.slide_desc { font-weight: bold }
.slide_filename { font-family: monospace }
.filename { font-family: monospace }
.curdir { font-size: xx-large; font-weight: normal }
.date { font-size: small }
.time { font-size: small }
END
return $t;
}
1;
view all matches for this distribution
view release on metacpan or search on metacpan
examples/initramfs-man/bin/initramfs-epub.sh view on Meta::CPAN
losetup
mount
pivot_root
poweroff
reboot
setfont
sh
sleep
blkid
cryptsetup
dmsetup
view all matches for this distribution
view release on metacpan or search on metacpan
share/onecolmlsol.tt2 view on Meta::CPAN
[%- MACRO Content BLOCK -%]
\documentclass[a4paper,10pt,final]{article}
\usepackage{a4wide}
\usepackage[a4paper,tmargin=1cm,lmargin=2.5cm,rmargin=1cm,includehead,includefoot,headheight=1cm]{geometry}
\usepackage[T1]{fontenc}
\usepackage{layouts} % for layout analyse
%\usepackage[math]{cellspace}
\usepackage{amsfonts}
\usepackage{amssymb}
\usepackage{amsmath}
\usepackage{mathtools}
\usepackage{eurosym}
share/onecolmlsol.tt2 view on Meta::CPAN
left = 1,
data = exercises.challenges,
type = 'longtable',
coldef = 'p{16cm}',
# eor = '\\\\[0.8em]',
fontsize = 'footnotesize',
)
-%]
\newpage
share/onecolmlsol.tt2 view on Meta::CPAN
left = 1,
data = solutions,
type = 'longtable',
coldef = 'p{16cm}',
# eor = '\\\\[0.8em]\\hline',
fontsize = 'footnotesize',
)
-%]
\end{document}
[%- END -%]
view all matches for this distribution
view release on metacpan or search on metacpan
script/mediapi view on Meta::CPAN
my $media_control_frame = $wnd->new_ttk__frame(-borderwidth => 5); # The border is here only to debug
$media_control_frame->g_grid(-column => 0, -row => 0, -sticky => 'nswe');
$wnd->g_grid_columnconfigure(0, -weight => 1);
$wnd->g_grid_rowconfigure(0, -weight => 1);
# The default font does not have the media control glyphs. So letâs create a
# style using Unifont that has almost all glyphs.
# Useful link: https://en.wikipedia.org/wiki/Media_control_symbols
Tkx::ttk__style_configure('Unicode.TButton', -font => 'Unifont 15');
$media_control_frame->g_grid_columnconfigure(0, -weight => 1);
$media_control_frame->g_grid_columnconfigure(1, -weight => 1);
$media_control_frame->g_grid_rowconfigure(0, -weight => 1);
$media_control_frame->g_grid_rowconfigure(1, -weight => 1);
view all matches for this distribution
view release on metacpan or search on metacpan
root/css/error.css view on Meta::CPAN
body {
font-family: Lucida,sans-serif;
}
h1 {
color: #AA0000;
border-bottom: 1px solid #444;
}
h2 { color: #444; }
pre {
font-family: "lucida console","monaco","andale mono","bitstream vera sans mono","consolas",monospace;
font-size: 12px;
border-left: 2px solid #777;
padding-left: 1em;
}
footer {
font-size: 10px;
}
span.key {
color: #449;
font-weight: bold;
width: 120px;
display: inline;
}
span.value {
root/css/error.css view on Meta::CPAN
border-top: 0;
margin-bottom: 1em;
}
div.title {
font-family: "lucida console","monaco","andale mono","bitstream vera sans mono","consolas",monospace;
font-size: 12px;
background-color: #aaa;
color: #444;
font-weight: bold;
padding: 3px;
padding-left: 10px;
}
pre.content span.nu {
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/MojoSlides/files/public/bootstrap.min.css view on Meta::CPAN
* Copyright 2013 Twitter, Inc
* Licensed under the Apache License v2.0
* http://www.apache.org/licenses/LICENSE-2.0
*
* Designed and built with all the love in the world by @mdo and @fat.
*//*! normalize.css v2.1.0 | MIT License | git.io/normalize */article,aside,details,figcaption,figure,footer,header,hgroup,main,nav,section,summary{display:block}audio,canvas,video{display:inline-block}audio:not([controls]){display:none;height:0}[hi...
view all matches for this distribution
view release on metacpan or search on metacpan
The standard CSS classes are:
.synComment { color: #0000FF }
.synConstant { color: #FF00FF }
.synIdentifier { color: #008B8B }
.synStatement { color: #A52A2A ; font-weight: bold }
.synPreProc { color: #A020F0 }
.synType { color: #2E8B57 ; font-weight: bold }
.synSpecial { color: #6A5ACD }
.synUnderlined { color: #000000 ; text-decoration: underline }
.synError { color: #FFFFFF ; background: #FF0000 none }
.synTodo { color: #0000FF ; background: #FFFF00 none }
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Music/ChordPro/Wx/Main.pm view on Meta::CPAN
$self;
}
use constant FONTSIZE => 12;
my @fonts =
( { name => "Monospace",
font => Wx::Font->new( FONTSIZE, wxFONTFAMILY_TELETYPE,
wxFONTSTYLE_NORMAL,
wxFONTWEIGHT_NORMAL ),
},
{ name => "Serif",
font => Wx::Font->new( FONTSIZE, wxFONTFAMILY_ROMAN,
wxFONTSTYLE_NORMAL,
wxFONTWEIGHT_NORMAL ),
},
{ name => "Sans serif",
font => Wx::Font->new( FONTSIZE, wxFONTFAMILY_SWISS,
wxFONTSTYLE_NORMAL,
wxFONTWEIGHT_NORMAL ),
},
);
lib/App/Music/ChordPro/Wx/Main.pm view on Meta::CPAN
xcode => "",
notation => "",
skipstdcfg => 1,
configfile => "",
pdfviewer => "",
editfont => 0,
editsize => FONTSIZE,
};
if ( $^O =~ /^mswin/i ) {
Wx::ConfigBase::Get->SetPath("/wxchordpro");
lib/App/Music/ChordPro/Wx/Main.pm view on Meta::CPAN
$self->{_verbose} = $options->{verbose};
$self->{_trace} = $options->{trace};
$self->{_debug} = $options->{debug};
$self->GetPreferences;
my $font = $fonts[$self->{prefs_editfont}]->{font};
$font->SetPointSize($self->{prefs_editsize});
$self->{t_source}->SetFont($font);
# Disable menu items if we cannot.
$self->{main_menubar}->FindItem(wxID_UNDO)
->Enable($self->{t_source}->CanUndo);
$self->{main_menubar}->FindItem(wxID_REDO)
lib/App/Music/ChordPro/Wx/Main.pm view on Meta::CPAN
}
}
return $notationlist;
}
sub fonts { \@fonts }
sub opendialog {
my ($self) = @_;
my $fd = Wx::FileDialog->new
($self, _T("Choose ChordPro file"),
view all matches for this distribution
view release on metacpan or search on metacpan
lib/ChordPro.pm view on Meta::CPAN
B<Note:> Chordii used the term _grid_ for chord diagrams. It
should not be confused with ChordPro grids.
=over 4
=item B<--text-font=>I<FONT> (short: B<-T>) *
Sets the font used to print lyrics and comments.
I<FONT> can be either a full path name to a TrueType font file, or the
name of one of the standard fonts. See section L</FONTS> for more
details.
=item B<--text-size=>I<N> (short: B<-t>) *
Sets the font size for lyrics and comments.
=item B<--chord-font=>I<FONT> (short: B<-C>) *
Sets the font used to print the chord names.
I<FONT> can be either a full path name to a TrueType font file, or the
name of one of the standard fonts. See section L</FONTS> for more
details.
=item B<--chord-size=>I<N> (short: B<-c>) *
Sets the font size for the chord names.
=item B<--chord-grid-size=>I<N> (short: B<-s>) *
Sets the total width of a chord diagram.
lib/ChordPro.pm view on Meta::CPAN
The default user config file depends on the operating system and user
environment. Common values are C<$HOME/.config/chordpro/chordpro.json>
and C<$HOME/.chordpro/chordpro.json>, where C<$HOME> indicates the
user home directory.
Here you can put settings for your preferred fonts and other layout
parameters that you want to apply to all B<chordpro> runs.
=item B<--nouserconfig>
Don't use the user specific config file, even if it exists.
lib/ChordPro.pm view on Meta::CPAN
"progress_callback=s",
### Standard Chordii Options ###
"about|A+" => \$about, # About...
"chord-font|C=s", # Sets chord font
"chord-grid-size|s=f", # Sets chord diagram size [30]
"chord-grids-sorted|S!", # Prints chord diagrams ordered
"chord-size|c=i", # Sets chord size [9]
"dump-chords|D", # Dumps chords definitions (PostScript)
"dump-chords-text|d" => \$dump_chords, # Dumps chords definitions (Text)
lib/ChordPro.pm view on Meta::CPAN
"page-number-logical|n", # Numbers logical pages, not physical
"page-size|P=s", # Specifies page size [letter, a4 (default)]
"single-space|a!", # Automatic single space lines without chords
"start-page-number|p=i", # Starting page number [1]
"text-size|t=i", # Sets text size [12]
"text-font|T=s", # Sets text font
"i" => sub { $clo->{toc} = 1 },
"toc!", # Generates a table of contents
"transpose|x=s", # Transposes by N semi-tones
"transcode|xc=s", # Transcodes to another notation
"user-chord-grids!", # Do[esn't] print diagrams for user defined chords.
lib/ChordPro.pm view on Meta::CPAN
$msg .= sprintf( $fmt2, $tag, $_->{dppath} );
$tag = "";
}
$tag = "FONTDIR";
for ( @{$i{general}{fontdir}//[]} ) {
next unless defined;
$msg .= sprintf( $fmt2, $tag, $_->{dppath} );
$tag = "";
}
lib/ChordPro.pm view on Meta::CPAN
}
}
if ( defined $ENV{FONTDIR} ) {
for ( $cp->path($ENV{FONTDIR}) ) {
push( @{$res->{general}{fontdir}},
{ path => $_,
dppath => $cp->display($_) } );
}
}
lib/ChordPro.pm view on Meta::CPAN
--transpose=N -x Transposes by N semi-tones
--version -V Prints version and exits
Chordii compatibility.
Options marked with * are better handled in the config file.
--chord-font=FONT -C *Sets chord font
--chord-grid-size=N -s *Sets chord diagram size [30]
--chord-grids-sorted -S *Prints chord diagrams ordered by key
--chord-size=N -c *Sets chord size [9]
--dump-chords -D Dumps chords definitions (PDF)
--dump-chords-text -d Dumps chords definitions (Text)
lib/ChordPro.pm view on Meta::CPAN
--no-easy-chord-grids -g Not supported
--page-number-logical -n Not supported
--page-size=FMT -P *Specifies page size [letter, a4 (default)]
--single-space -a *Automatic single space lines without chords
--text-size=N -t *Sets text size [12]
--text-font=FONT -T *Sets text font
--user-chord-grids *Prints the user defined chords in the song
--vertical-space=N -w *Extra vertical space between lines
--2-up -2 Not supported
--4-up -4 Not supported
lib/ChordPro.pm view on Meta::CPAN
exit $exit if defined $exit;
}
=head1 FONTS
There are two ways to specify fonts: with a font filename, and a
built-in font name.
A font filename must be either and absolute filename, or a relative
filename which is interpreted relative to the I<font path>, which
consists of configuration setting C<fontdir>, the C<fonts> resource
dir, and the contents of environment variable C<FONTDIR>. In any case,
the filename should point to a valid TrueType (C<.ttf>) or OpenType
(C<.otf>) font.
If it is not a filename, it must be the name one of the built-in PDF core fonts:
Courier Symbol
Courier-Bold Times-Bold
Courier-BoldOblique Times-BoldItalic
Courier-Oblique Times-Italic
lib/ChordPro.pm view on Meta::CPAN
* User defined chords and tuning, not limited to 6 strings.
* Support for Nashville Numbering and Roman Numbering.
* Support for external TrueType and OpenType fonts
* Font kerning (with external TrueType fonts)
* Fully customizable layout, fonts and sizes
* Customizable backends for PDF, ChordPro, LilyPond*, LaTeX* and HTML*.
(* = under development)
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Music/PlayTab/Output/PDF.pm view on Meta::CPAN
marginleft => 50,
margintop => 40,
marginbottom => 50,
marginright => 45, # only used for page number!
lineheight => 15,
fonts => {
title => { name => 'Helvetica',
file => 'ArialMT.ttf',
size => 16 },
subtitle => { name => 'Helvetica',
file => 'ArialMT.ttf',
lib/App/Music/PlayTab/Output/PDF.pm view on Meta::CPAN
# Init the backend.
sub setup {
my ( $self, $args, $title ) = @_;
@delta_values = ( 0, 0, 0 );
$ps->{fonts}->{chord} = $ps->{fonts}->{chord_n};
@mediabox = ( 0, 0, @{ $ps->{papersize} } );
if ( $args->{opus}->{globalsettings} ) {
$self->globalsettings( $args->{opus}->{globalsettings} );
}
my $options = { pagedefs_default => { pdf => $ps } };
$self->pagesettings($options);
$ps = $self->{ps};
# Add font dirs.
for my $fontdir ( $self->{fontdir}, ::findlib("fonts"), $ENV{FONTDIR} ) {
next unless $fontdir;
if ( -d $fontdir ) {
warn("PDF: Adding fontdir $fontdir\n");
PDF::API2::addFontDirs($fontdir);
}
else {
warn("PDF: Ignoring fontdir $fontdir [$!]\n");
undef $fontdir;
}
}
$self->initfonts($options);
unless ( $pr ) {
$pr = PDFWriter->new;
my @tm = gmtime(time);
lib/App/Music/PlayTab/Output/PDF.pm view on Meta::CPAN
}
# newline() is called before setup_line(). Supply standard value.
$yd = -15;
$f_chord = $ps->{fonts}->{chord};
$f_msyms = $ps->{fonts}->{msyms};
}
sub globalsettings {
my ( $self, $args ) = @_;
lib/App/Music/PlayTab/Output/PDF.pm view on Meta::CPAN
my $media = $1;
if ( $media eq "800x1280" ) {
# 800x1280 Samsung Galaxy Note 10.1 tablet.
@delta_values = ( -4, 2, 4 );
$condensed = 1;
$ps->{fonts}->{chord} = $ps->{fonts}->{chord_cn};
@mediabox = map { $_ * (72/150) } 80, 435, 800, 1280;
$mediabox[2] += $mediabox[0];
$mediabox[3] += $mediabox[1];
}
elsif ( $media =~ /^(ipad|960x1280)$/ ) {
# 768x1024 iPad2.
@delta_values = ( -7, 2, -10 );
$condensed = 0;
$ps->{fonts}->{chord} = $ps->{fonts}->{chord_cn};
@mediabox = map { $_ * (72/150) } 70, 440, 960, 1280;
$mediabox[2] += $mediabox[0];
$mediabox[3] += $mediabox[1];
}
elsif ( $media eq "768x1024" ) {
# 768x1024 iPad2.
@delta_values = ( -12, 3, -10 );
$ps->{fonts}->{chord} = $ps->{fonts}->{chord_cn};
@mediabox = map { $_ * (72/150) } 90, 685, 768, 1024;
$mediabox[2] += $mediabox[0];
$mediabox[3] += $mediabox[1];
}
else {
lib/App/Music/PlayTab/Output/PDF.pm view on Meta::CPAN
next;
}
if ( $arg eq "narrow" ) { #### IN PROGRESS
@delta_values = ( -4, 1, 4 );
$condensed = 1;
$ps->{fonts}->{chord} = $ps->{fonts}->{chord_cn};
@mediabox = map { $_ * (72/150) } 70, 440, 800, 1280;
$mediabox[2] += $mediabox[0];
$mediabox[3] += $mediabox[1];
next;
}
if ( $arg eq "condensed" ) {
$ps->{fonts}->{chord} = $ps->{fonts}->{chord_cn};
next;
}
}
}
lib/App/Music/PlayTab/Output/PDF.pm view on Meta::CPAN
sub bar {
my ( $self, $first ) = @_;
$self->checkvspace;
$pr->vline( $x + $md, $y + 13, 16 );
$pr->rtext( $x + $md - 2, $y + 9, $barno, $ps->{fonts}->{barno} )
if $first && defined($barno);
$x += 4;
}
sub chord {
lib/App/Music/PlayTab/Output/PDF.pm view on Meta::CPAN
$y += $yd;
$y += ($xtra-1)*$yd if defined $xtra;
}
sub text {
my ( $self, $text, $xxmd, $font ) = @_;
$font ||= $ps->{fonts}->{subtitle};
$xxmd ||= 0;
$self->checkvspace;
$pr->text( $x + $xxmd, $y, $text, $font );
}
sub postfix {
my ( $self, $text ) = @_;
$x += 4;
lib/App/Music/PlayTab/Output/PDF.pm view on Meta::CPAN
$x = $ps->{marginleft};
$y = $ps->{papersize}->[1] - $ps->{margintop};
$pdf_page = $first ? 1 : $pdf_page+1;
# Print title header.
$pr->text( $x, $y, $self->{title} = $title, $ps->{fonts}->{title} );
# Add page number, if not first (or only) page.
if ( $pdf_page > 1 ) {
$pr->rtext( $ps->{papersize}->[0] - $ps->{marginright}, $y,
"Page $pdf_page",
$ps->{fonts}->{subtitle} );
}
$self->newline;
# Add subtitles, if any,
foreach ( @$stitles ) {
$pr->text( $x, $y, $_, $ps->{fonts}->{subtitle} );
$self->newline;
}
# And finally some vertical space.
$self->newline(2);
lib/App/Music/PlayTab/Output/PDF.pm view on Meta::CPAN
#
# Copied from GImager.
use JSON::PP ();
# Setup fonts.
sub initfonts {
my ( $self ) = @_;
}
# API: pagesettings (inheritable)
sub pagesettings {
lib/App/Music/PlayTab/Output/PDF.pm view on Meta::CPAN
};
# Use fallback values, if necessary.
$ret->{pdf}->{$_} ||= $def->{$_} foreach keys(%$def);
my $stdfonts =
{ text => {
name => 'Times-Roman',
size => 12,
fallback => "/home/jv/.fonts/TimesNewRomanPSMT.ttf",
},
};
# Use fallback fonts, if necessary.
$ret->{pdf}->{fonts}->{$_} ||= $stdfonts->{$_} foreach keys(%$stdfonts);
unless ( eval { $ret->{pdf}->{papersize}->[0] } ) {
require PDF::API2::Resource::PaperSizes;
my %ps = PDF::API2::Resource::PaperSizes->get_paper_sizes;
$ret->{pdf}->{papersize} = $ps{lc $ret->{pdf}->{papersize}}
lib/App/Music/PlayTab/Output/PDF.pm view on Meta::CPAN
################ App::Music::PlayTab::Note ################
package App::Music::PlayTab::Note;
# Glyph mappings of the MSyms font.
use constant MS_SHARP => "\x{0021}";
use constant MS_FLAT => "\x{0022}";
use constant MS_NATURAL => "\x{0023}";
sub render {
lib/App/Music/PlayTab/Output/PDF.pm view on Meta::CPAN
sub render_small {
my ($self) = @_;
my $name = $self->name;
$chord_small ||= 0.7 * $ps->{fonts}->{chord}->{size};
$msym_small ||= 0.7 * 25;
my $width;
if ( $name =~ /(.)b/ ) {
$width = $pr->strwidth( $1, $f_chord, $chord_small );
lib/App/Music/PlayTab/Output/PDF.pm view on Meta::CPAN
################ App::Music::PlayTab::Chord ################
package App::Music::PlayTab::Chord;
# Glyph mappings of the MSyms font.
use constant MS_SHARP => "\x{0021}";
use constant MS_FLAT => "\x{0022}";
use constant MS_DIM => "\x{0027}";
use constant MS_HDIM => "\x{0028}";
use constant MS_AUG => "\x{0029}";
lib/App/Music/PlayTab/Output/PDF.pm view on Meta::CPAN
use strict;
use warnings;
use PDF::API2;
use Encode;
my %fonts;
# Glyph mappings of the MSyms font.
use constant MS_FBFILLED => "\x{002e}";
use constant MS_FBX => "\x{002f}";
use constant MS_FBOPEN => "\x{0030}";
sub new {
lib/App/Music/PlayTab/Output/PDF.pm view on Meta::CPAN
goto &_text;
}
sub msym {
my ( $self, $x, $y, $sym, $size ) = @_;
my $font = $f_msyms;
$size ||= $font->{size};
$self->setfont($font, $size);
$self->{pdftext}->translate( $x, $y );
$self->{pdftext}->text($sym);
}
my %msymwidth;
lib/App/Music/PlayTab/Output/PDF.pm view on Meta::CPAN
sub msymwidth {
my ( $self, $sym, $size ) = @_;
my $key = $sym;
$key .= "\0$size" if defined $size;
$msymwidth{$key} ||= do {
my $font = $f_msyms;
$size ||= $font->{size};
$self->setfont($font, $size);
$self->{pdftext}->advancewidth($sym);
};
}
sub _text {
my ( $self, $align, $x, $y, $text, $font, $size ) = @_;
$font ||= $self->{font};
$size ||= $font->{size};
$self->setfont($font, $size);
# $text = encode( "cp1250", $text ) unless $font->{file}; # #### TODO ???
$text =~ s/'/â/g; # '/;
$text =~ s/\x{2007}/ /g; # Figure space.
if ( 0 ) {
warn( "TEXT: ",
'"', $text, '" [ ',
defined $x ? "x=$x " : "",
defined $y ? "y=$y " : "",
$font->{name} ? "font=".($font->{name})." " : "",
$size ? "size=$size " : "",
"]\n" );
}
$self->{pdftext}->translate( $x, $y );
lib/App/Music/PlayTab/Output/PDF.pm view on Meta::CPAN
else {
$self->{pdftext}->text_center($text);
}
}
sub setfont {
my ( $self, $font, $size ) = @_;
$self->{font} = $font;
$self->{fontsize} = $size ||= $font->{size};
$self->{pdftext}->font( $self->_getfont($font), $size );
}
sub _getfont {
my ( $self, $font ) = @_;
$self->{font} = $font;
if ( $font->{file} ) {
return $fonts{$font->{file}} if $fonts{$font->{file}};
my $fn = $font->{file};
warn("PDF: Adding font $fn\n");
$fn =~ s;^.*/([^/]+)$;$1;;
if ( $font->{file} =~ /\.ttf$/ ) {
return $fonts{$font->{file}} =
$self->{pdf}->ttfont( $fn,
-dokern => 1 );
}
if ( $font->{file} =~ /(^.*)\.pf[ab]$/ ) {
my $metrics = "$1.afm";
return $fonts{$font->{file}} =
$self->{pdf}->psfont( $fn,
-afmfile => "$metrics",
-dokern => $font->{file} !~ /msyms/i );
}
}
else {
return $fonts{$font->{name}} ||=
$self->{pdf}->corefont( $font->{name} );
}
}
my %strwidth;
sub strwidth {
my ( $self, $text, $font, $size ) = @_;
$font ||= $self->{font};
$size ||= $font->{size};
my $key = "$text\0$font\0$size";
$strwidth{$key} ||= do {
$self->setfont( $font, $size );
$self->{pdftext}->advancewidth($text);
};
}
sub newpage {
view all matches for this distribution
view release on metacpan or search on metacpan
filedb/styles/demo-A4.txt view on Meta::CPAN
},
"cover": {
"columns": 1
},
"toc": {
"font": {
"colour": "#00f"
}
},
"title": {
"margin_bottom": 3
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Nag.pm view on Meta::CPAN
require File::Temp;
my $phrase = PHRASE->[$verbosity];
my $fill = FILL->[$verbosity];
my $stroke = STROKE->[$verbosity];
my $font_size = FONT_SIZE->[$verbosity];
my ( $x, $y ) = @{ XY->[$verbosity] };
my $text = <<END;
<?xml version="1.0" encoding="utf-8" standalone="no"?>
<!--
Created by $name with some help from Inkscape (http://www.inkscape.org/)
lib/App/Nag.pm view on Meta::CPAN
version="1.1">
<g id="layer1">
<rect style="fill:#$fill;fill-rule:evenodd;stroke:#$stroke;stroke-width:3px;stroke-linecap:butt;stroke-linejoin:round;stroke-opacity:1"
id="rect2993" width="62" height="62" x="1" y="1" />
<text xml:space="preserve"
style="font-size:${font_size}px;font-style:normal;font-weight:bold;line-height:125%;letter-spacing:0px;word-spacing:0px;fill:#$stroke;fill-opacity:1;stroke:none;font-family:Monospace;opacity:1"
x="12.525171" y="28.595528" id="text3763">
<tspan id="tspan3765" x="$x" y="$y">$phrase</tspan>
</text>
</g>
</svg>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Navegante/CGI.pm view on Meta::CPAN
$_ =~ m/\s*(.*?)\s*=>\s*(.*)/;
$hash{$1} = $2;
}
foreach (keys %hash) {
if ($hash{$_} eq 'submit') {
$h .= "<input style='font-size: 65%;' type='$hash{$_}' value='".eval($_)."'><br />";
next;
}
$h .= "<input style='font-size: 65%;' type='$hash{$_}' size='10' name='$_'><br />";
}
$h.=<<'END_IFORM';
</center></form>
</div>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Netdisco/Util/Graph.pm view on Meta::CPAN
my $graph_defs = {
'bgcolor' => $CONFIG{graph_bg} || 'black',
'color' => $CONFIG{graph_color} || 'white',
'overlap' => $CONFIG{graph_overlap} || 'scale',
'fontpath'=> _homepath('graph_fontpath',''),
'ranksep' => $CONFIG{graph_ranksep} || 0.3,
'nodesep' => $CONFIG{graph_nodesep} || 2,
'ratio' => $CONFIG{graph_ratio} || 'compress',
'splines' => ($CONFIG{graph_splines} ? 'true' : 'false'),
'fontcolor' => $CONFIG{node_fontcolor} || 'white',
'fontname' => $CONFIG{node_font} || 'lucon',
'fontsize' => $CONFIG{node_fontsize} || 12,
};
my $edge_defs = {
'color' => $CONFIG{edge_color} || 'wheat',
};
my $node_defs = {
'shape' => $CONFIG{node_shape} || 'box',
'fillcolor' => $CONFIG{node_fillcolor} || 'dimgrey',
'fontcolor' => $CONFIG{node_fontcolor} || 'white',
'style' => $CONFIG{node_style} || 'filled',
'fontname' => $CONFIG{node_font} || 'lucon',
'fontsize' => $CONFIG{node_fontsize} || 12,
'fixedsize' => ($CONFIG{node_fixedsize} ? 'true' : 'false'),
};
$node_defs->{height} = $CONFIG{node_height} if defined $CONFIG{node_height};
$node_defs->{width} = $CONFIG{node_width} if defined $CONFIG{node_width};
view all matches for this distribution
view release on metacpan or search on metacpan
doc/algorithm.svg view on Meta::CPAN
<svg xmlns="http://www.w3.org/2000/svg" width="642px" height="1144px" xmlns:xlink="http://www.w3.org/1999/xlink" version="1.1"><defs><linearGradient x1="0%" y1="0%" x2="0%" y2="100%" id="mx-gradient-ffffff-1-e6e6e6-1-s-0"><stop offset="0%" style="sto...
view all matches for this distribution
view release on metacpan or search on metacpan
bin/noodlepay.pl view on Meta::CPAN
my $qrxpm = GD::Barcode::QRcode->new($text, { Version => $version, Ecc => L, ModuleSize => 4 })->barcode;
$qrxpm =~ /^(.*)$/m; my $qrsize = length($1);
$qr = Wx::Bitmap->newFromXPM([ split /\n/, "$qrsize $qrsize 2 1\n0 c #FFFFFF\n1 c #000000\n$qrxpm" ]);
}
if (defined $qr) {
my $fontheight = $frame->GetCharHeight;
$msg = "\n" x ($qr->GetHeight / $fontheight) . "\n\n$msgtxt";
$dialog = Wx::TextEntryDialog->new($frame, $msg , $title, $text);
my $dialog_height = $dialog->GetSize->GetHeight;
my $dialogwidth = $dialog->GetSize->GetWidth;
my $qrheight = $qr->GetHeight; my $width = $qrheight + 20 > $dialogwidth ? $qrheight + 20 : $dialogwidth;
my $adjust = 10 unless $^O eq 'MSWin32' or $^O eq 'darwin';
view all matches for this distribution
view release on metacpan or search on metacpan
t/002-encoding.t view on Meta::CPAN
<tr>
<td>
<img src="http://paste.scsys.co.uk/static/nopaste.gif" alt="POE Paste with lovely alien head...">
</td>
<td align="left">
<h1><font face="courier new">No paste!</font></h1>
<font face="courier new" size="-1">
1. Select the channel for the URL announcment.<br>
2. Supply a nick for the announcement.<br>
3. Supply an summary of the paste for the announcement<br>
4. <b>Paste!</b><br>
5. Submit the form with the Paste it! button.<br>
</font>
</td>
</tr>
</table>
<form method='post' action='http://paste.scsys.co.uk/paste' enctype='application/x-www-from-urlencoded' name="pasteForm">
<font face="courier new" size="-1"><br><br>
1. channel: <select name='channel'><option value="" selected>(none)</option> <option value="#angerwhale">#angerwhale</option> <option value="#axkit-dahut">#axkit-dahut</option> <option value="#catalyst">#catalyst</option> <option value="#cataly...
2. your nick: <input type='text' name='nick' size='25' maxlength='25'><br><br>
3. summary: <input type='text' name='summary' size='80' maxlength='160'><br><br>
4. paste: <textarea name='paste' rows=25 cols=75 style='width:100%'></textarea><br><br>
5. <input type='submit' name='Paste it' value='Paste it'><input type='reset' name='Clear form' value='Clear form'>
</font>
</form><br>
<div align="right">
<a href="http://validator.w3.org/check/referer"><img border="0" src="http://www.w3.org/Icons/valid-html401" alt="Valid HTML 4.01!" height="31" width="88"></a><br><br>
</div>
<div>
<div align=right><font size='-1'><a href='http://sf.net/projects/pastebot/'>Pastebot</a> is powered by <a href='http://poe.perl.org/'>POE</a>.</font></div>
</div>
<!-- Automatically put the clipboard contents into the paste field and select it. -->
<script language="jscript" type="">
onload=function () {
try {
t/002-encoding.t view on Meta::CPAN
</p>
<p>
<pre>âtestâ</pre>
</p>
<p>
<div align=right><font size='-1'><a href='http://sf.net/projects/pastebot/'>Pastebot</a> is powered by <a href='http://poe.perl.org/'>POE</a>.</font></div>
</p>
</body>
</html>
RETURN
);
view all matches for this distribution
view release on metacpan or search on metacpan
htdocs/assets/css/app/office/cms/web.page.css view on Meta::CPAN
}
.blue_center
{
background-color: #6293cd;
font-weight: bold;
text-align: center;
}
.error
{
color: red;
font-weight: bold;
}
.hidden_div
{
background-color: #6293cd;
view all matches for this distribution
view release on metacpan or search on metacpan
data/currency.html view on Meta::CPAN
<html><head><meta http-equiv="Content-Type" content="text/html; charset=utf-8"><title>Currency Converter - Yahoo!7 Finance</title><link rel="STYLESHEET" type="text/css" href="http://l.yimg.com/au.yimg.com/i/fi/css/finance.css"><link rel="STYLESHEET" ...
td{font-size:12px}
</style><link rel="stylesheet" href="http://us.i1.yimg.com/us.yimg.com/i/us/fi/03rd/yfnc2.css" type="text/css" media="screen"><style media="screen">
.modtbl{width:100%}
.fixThisDiv:after{content:".";display:block;font-size:0px;line-height:0px;height:0;clear:both;visibility:hidden}
#screen,#masthead{text-align:center;margin:0;width:752px;}
#masthead{padding-bottom:12px;}
#leftcol,#rightcol{margin:0;}
#leftcol{width:155px;float:left;}
#rightcol{width:585px;}
data/currency.html view on Meta::CPAN
<iframe src="http://au.adserver.yahoo.com/a?f=97009443:N&p=aufin&l=N&c=hm&bg=ffffff" width=730 height=90 marginwidth=0 marginheight=0 hspace=0 vspace=0 frameborder=0 scrolling=no>
</iframe>
</noscript><script language=javascript>
if(window.yzq_d==null)window.yzq_d=new Object();
window.yzq_d['1qa3D9j8elY-']='&U=13a3gpm2c%2fN%3d1qa3D9j8elY-%2fC%3d253710.6883973.7821591.6512253%2fD%3dN%2fB%3d2810323%2fV%3d1';
</script><noscript><img width=1 height=1 alt="" src="http://row.bc.yahoo.com/b?P=VG0eKEWTUElF_P44Sw9AuwD5yxwJHEsUi3wAC9E3&T=161l699cu%2fX%3d1259637628%2fE%3d97009443%2fR%3daufin%2fK%3d5%2fV%3d2.1%2fW%3dHR%2fY%3dAUNZ%2fF%3d325249412%2fH%3dY2FjaGVoaW50...
<script language="JavaScript" type="text/javascript" src="http://au.adserver.yahoo.com/a?f=97009443:LREC&p=aufin&l=LREC&c=rm">
</script>
<noscript>
<iframe src="http://au.adserver.yahoo.com/a?f=97009443:LREC&p=aufin&l=LREC&c=hm&bg=ffffff" width=310 height=260 marginwidth=0 marginheight=0 hspace=0 vspace=0 frameborder=0 scrolling=no>
</iframe>
view all matches for this distribution
view release on metacpan or search on metacpan
htdocs/assets/css/app/office/contacts/homepage.css view on Meta::CPAN
.blue_centered
{
background-color: #6293cd;
color: #ffffff;
font-weight: bold;
text-align: center;
}
.bordered
{
htdocs/assets/css/app/office/contacts/homepage.css view on Meta::CPAN
}
.error
{
color: red;
font-weight: bold;
}
.hidden_div
{
background-color: #6293cd;
htdocs/assets/css/app/office/contacts/homepage.css view on Meta::CPAN
.white_centered
{
background-color: #ffffff;
color: #6293cd;
font-weight: bold;
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Oozie/Deploy/Validate/DAG/Workflow.pm view on Meta::CPAN
require Graph::Writer::GraphViz;
Graph::Writer::GraphViz->new(
-edge_color => 1,
-fontsize => 8,
-format => 'png',
-layout => 'twopi',
-node_color => 2,
-ranksep => 1.5,
)->write_graph( $g, $file );
view all matches for this distribution
view release on metacpan or search on metacpan
share/title_abbr_iso4.csv view on Meta::CPAN
"bloembollencultuur-";"bloembollencult.";"dut"
"bloembollenonderzoek";"bloembollenonderz.";"dut"
"bloembollenteelt";"bloembollent.";"dut"
"Bloemendaal";"n.a.";"dut"
"bloemendetailhandel";"bloemendetailhand.";"dut"
"Bloemfontein";"n.a.";"afr"
"bloemist";"bloem.";"dut"
"bloemisterij";"bloemist.";"dut"
"bloemschikken";"n.a.";"dut"
"blokovskij";"blok.";"rus"
"bloksopolimer-";"bloksopolim.";"rus"
share/title_abbr_iso4.csv view on Meta::CPAN
"božestvenn-";"božestv.";"rus"
"bozÌi-";"bozÌ.";"bul"
"bozÌicÌ-";"bozÌicÌ.";"hrv"
"BozÌji";"n.a.";"hrv"
"bozÌur";"n.a.";"bul"
"Braamfontein";"n.a.";"afr"
"brabançon";"n.a.";"fre"
"Brabant";"n.a.";"fre"
"brabant-";"brabant.";"fre, dut"
"Bracebridge";"n.a.";"eng"
"brachycera";"n.a.";"eng"
share/title_abbr_iso4.csv view on Meta::CPAN
"foniaÌtria";"foniaÌtr.";"hun"
"fonoaudiolog-";"fonoaudiol.";"spa"
"fonograficzny";"fonogr.";"pol"
"fonoloÌgico";"fonol.";"spa"
"Fontainebleau";"n.a.";"fre"
"fontana";"font.";"lat"
"fontes";"font. ";"lat"
"fontos";"n.a.";"hun"
"food";"n.a.";"eng"
"foodborne";"n.a.";"eng"
"foodbroker";"foodbrok.";"eng"
"foodcrop";"foodcr.";"eng"
"foodlink";"n.a.";"eng"
share/title_abbr_iso4.csv view on Meta::CPAN
"rancher";"n.a.";"eng"
"rancho";"n.a.";"spa"
"Randburg";"Randbg.";"afr"
"Randers";"n.a.";"dan"
"Randesund";"n.a.";"nor"
"Randfontein";"n.a.";"afr"
"Randgebiet-";"Randgeb.";"ger"
"Randgruppe";"Randgr.";"ger"
"random";"n.a.";"eng"
"randonneÌe";"n.a.";"fre"
"Randstad";"n.a.";"dut"
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/PDoc.pm view on Meta::CPAN
<!-- Default options -->
<!-- =============== -->
<!--+ -H $HOME/.pandoc/templates/policies/{squeeze,columns}.latex +-->
<!--+ -sSN --toc +-->
<!--+ -Vfontsize:8pt,a4paper,twocolumn,landscape +-->
<!--+ -o parsing.pdf +-->
<!-- Unused options (regular comments) -->
<!-- ================================= -->
<!-- -H $HOME/.pandoc/templates/policies/columns.latex +-->
lib/App/PDoc.pm view on Meta::CPAN
Also note, how additional options are set via C<<< pandoc >>>'s C<<< -V >>>-switch, and how even more options are smuggled in into C<<< pandoc >>>'s own latex template. (The latter you can find using C<<< pandoc -D latex >>>) in using
=back
-Vfontsize:8pt,a4paper,twocolumn,landscape
=head1 SEE ALSO
=over
view all matches for this distribution
view release on metacpan or search on metacpan
share/templates/default.html view on Meta::CPAN
<style type="text/css">
html {
margin : 0;
padding : 0;
font-family : sans-serif;
}
body {
margin : 0 auto 0;
padding : 5em 5em 0;
min-width : 40em;
max-width : 50em;
font-size : 10pt;
line-height : 1.3em;
}
h1,h2,h3,h4,h5,h6 {
line-height : 1em;
share/templates/default.html view on Meta::CPAN
margin-top : 3em;
width : 30%;
}
div#sitemap h1 {
font-size : 1em;
}
div#sitemap h2 {
font-size : 1em;
font-style : italic;
}
h1#sitetitle {
margin-bottom : 1em;
border-bottom : 1px solid cornflowerblue;
share/templates/default.html view on Meta::CPAN
div#pagetitle {
margin : 2em 0 2em;
}
div#pagetitle h2 {
font-size : 1em;
}
div#pagetitle h3 {
font-size : 1em;
display : inline;
font-style : italic;
}
div#navigation ul {
list-style-type : none;
}
share/templates/default.html view on Meta::CPAN
div#navigation li h3 {
display : inline;
}
div#content {
font-family : serif;
width : 65%;
}
div#content #title h1 {
font-size : 2em;
}
div#content #text pre {
overflow : auto;
background : #eaeaea;
share/templates/default.html view on Meta::CPAN
div#content p img {
max-width : 100%;
}
div#content h1,h2,h3,h4,h5,h6 { font-family : sans; }
div#content h1 { font-size : 1.7em; }
div#content h2 { font-size : 1.5em; }
div#content h3 { font-size : 1.4em; }
div#content h4 { font-size : 1.3em; }
div#content h5 { font-size : 1.2em; }
div#content h6 { font-size : 1.1em; }
div#footer {
color : silver;
clear : right;
margin-right : 0;
margin-left : auto;
font-size : .8em;
text-align : left;
}
</style>
</head>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/PLab/ButtonGlyphs.pm view on Meta::CPAN
use constant fldrmany => 62;
use constant fldropen => 63;
use constant fldrshut => 64;
use constant floppy => 65;
use constant foldrdoc => 66;
use constant font => 67;
use constant fontbold => 68;
use constant fontital => 69;
use constant fontsize => 70;
use constant form => 71;
use constant gears => 72;
use constant globe => 73;
use constant group => 74;
use constant grphbar => 75;
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/PerlTidy/Tk.pm view on Meta::CPAN
my ($self) = @_;
}
sub zoom {
my ($self, $number) = @_;
my $font_info = $self->{text}->configure('-font');
#print "${$font_info->[4]}\n"; # 'fixed 20';
my ($font, $size) = split / /, ${$font_info->[4]};
$size += $number;
$self->{text}->configure(-font => ['fixed', $size]);
}
sub create_config_panel {
my ($self) = @_;
lib/App/PerlTidy/Tk.pm view on Meta::CPAN
#my $name = 'line-up-parentheses';
#print $self->{flags}{$name}, "\n";
#my $cb = $self->{top}->Checkbutton(
# -text => $name,
# -variable => \$self->{flags}{$name},
# -font => ['fixed', 10]
#);
#$cb->pack(-side => 'left');
for my $name (@options) {
$row++;
lib/App/PerlTidy/Tk.pm view on Meta::CPAN
sub create_text_widget {
my ($self) = @_;
$self->{text} = $self->{top}->Text(
-state => 'normal',
-font => ['fixed', 12],
);
$self->{text}->pack(-fill => 'both', -expand => 1);
}
sub show_open {
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Phoebe/TokiPona.pm view on Meta::CPAN
use App::Phoebe::Web;
use App::Phoebe qw(@extensions $server $log);
use File::Slurper qw(read_binary);
use Modern::Perl;
push(@extensions, \&toki_pona_font);
sub toki_pona_font {
my $stream = shift;
my $request = shift;
if ($request =~ m!^GET /linja-pona-4.2.woff HTTP/1\.[01]$!) {
serve_font_via_http($stream);
return 1;
}
return 0;
}
sub serve_font_via_http {
my $stream = shift;
$log->info("Serving font via HTTP");
$stream->write("HTTP/1.1 200 OK\r\n");
$stream->write("Content-Type: font/woff\r\n");
$stream->write("Cache-Control: public, max-age=86400, immutable\r\n"); # 24h
$stream->write("\r\n");
my $dir = $server->{wiki_dir};
$stream->write(read_binary("$dir/linja-pona-4.2.woff"));
}
lib/App/Phoebe/TokiPona.pm view on Meta::CPAN
sub serve_css_via_http {
my $stream = shift;
old_serve_css_via_http($stream);
$log->info("Adding more CSS via HTTP (for toki pona)");
$stream->write(<<'EOT');
@font-face {
font-family: linja-pona;
src: url('/linja-pona-4.2.woff') format('woff');
font-weight: normal;
font-style: normal;
}
pre.toki {
font-family: linja-pona;
font-feature-settings: "liga" 1, "clig" 1, "calt" 1, "kern" 1, "mark" 1;
text-rendering: optimizeLegibility;
font-size: 150%;
}
EOT
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Pinpp.pm view on Meta::CPAN
# Trim off leading spaces.
$slide =~ s{^$space_leader}{}smg;
# Return our slide.
return "-- [font=monospace 50px][text-align=left]\n$slide";
}
# Returns number of leading spaces on a line.
# TODO: Handle tabs
sub _count_leading_spaces {
view all matches for this distribution