view release on metacpan or search on metacpan
lib/HTML/Valid/Tagset.pm view on Meta::CPAN
'aria-disabled' => 'pcdata',
'aria-dropeffect' => 'pcdata',
'aria-expanded' => 'pcdata',
'aria-flowto' => 'pcdata',
'aria-grabbed' => 'pcdata',
'aria-haspopup' => 'pcdata',
'aria-hidden' => 'pcdata',
'aria-invalid' => 'pcdata',
'aria-label' => 'pcdata',
'aria-labelledby' => 'pcdata',
'aria-level' => 'pcdata',
view all matches for this distribution
view release on metacpan or search on metacpan
t/01-mediawiki.t view on Meta::CPAN
__W__
<div>thing</div>
__NEXT__
div w/ attrs
__H__
<html><div id="name" class="panel" onclick="popup()">thing</div></html>
__W__
<div id="name" class="panel">thing</div>
__NEXT__
sub
__H__
view all matches for this distribution
view release on metacpan or search on metacpan
t/cookies.txt view on Meta::CPAN
[General]
cookies="@Variant(\0\0\0\x7f\0\0\0\x16QList<QNetworkCookie>\0\0\0\0\x1\0\0\0\x94\0\0\0\x97PREF=ID=1111111111111111:FF=0:NW=1:TM=1446826152:LM=1446826152:V=1:S=LBshVRJ2lZzKvDDi; expires=Thu, 31-Dec-2015 16:02:17 GMT; domain=.google.ru; path=/\0\0\0\xf...
view all matches for this distribution
view release on metacpan or search on metacpan
lib/HTTP/Promise/Headers.pm view on Meta::CPAN
See also L<Mozilla documentation|https://developer.mozilla.org/en-US/docs/Web/HTTP/Headers/Cross-Origin-Embedder-Policy>
=head2 cross_origin_opener_policy
# Cross-Origin-Opener-Policy: unsafe-none
# Cross-Origin-Opener-Policy: same-origin-allow-popups
# Cross-Origin-Opener-Policy: same-origin
This sets or gets the C<Cross-Origin-Opener-Policy> header value. It takes a string value.
It can have either of the following value: C<unsafe-none> or C<same-origin-allow-popups> or C<same-origin>
See also L<Mozilla documentation|https://developer.mozilla.org/en-US/docs/Web/HTTP/Headers/Cross-Origin-Opener-Policy>
=head2 cross_origin_resource_policy
view all matches for this distribution
view release on metacpan or search on metacpan
0.05 17 August 2005
Fixed a bug where link text wasn't being un-escaped before being
logged.
Significant changes in the use of the Control Panel:
- The showwindow option is gone (no popups any more).
- If you want to use the control panel, you need to start there.
- The control panel now spawns a window for navigation.
- The navigation window updates the Control Panel via Javascript.
Download button downloads the script file directly.
0.03_01 1 March 2004
Support for recording SSL
Added a UI
- Available via control URL rather than a JS popup
- Update, reset clear, download features
- "Goto page" functionality
Rewriting improvements
- Support 'link' tag
view all matches for this distribution
view release on metacpan or search on metacpan
user_manage view on Meta::CPAN
th({valign=>'TOP',align=>'RIGHT'},"Existing Users"),
td({valign=>'TOP',align=>'LEFT',rowspan=>2},
@users > $MAX_SCROLL ? scrolling_list(-name=>'user','-values'=>\@users,-size=>$MAX_SCROLL,
-default=>$Q::user[$#user]||$Q::user,
-override=>1)
: popup_menu(-name=>'user','-values'=>\@users,
-default=>$Q::user[$#user]||$Q::user,
-override=>1)
),
th({valign=>'MIDDLE',align=>'RIGHT'},"New User"),
td({valign=>'MIDDLE',align=>'LEFT'},textfield(-name=>'user',-default=>'',-override=>1,-width=>16),
user_manage view on Meta::CPAN
my $ref_info = ref($info) ? $info->{$_} : $default;
if ($fields{$_}=~/^c\[([^,]*(,[^,]*)*)\]$/) {
# Selection field
my @elements = split(/,/, $1);
my $def = ref($info) ? $info->{$_} : $elements[0];
push(@cells,popup_menu(-name=>"F_$_",-values=>\@elements,-default=>$def));
}
elsif ($fields{$_}=~/^m\d*\.(\d+)/) {
$height = $1;
# Multi-line textbox [CJD]
push(@cells,textarea(-name=>"F_$_",-columns=>$length,-rows=>$height,-value=>$ref_info,-default=>$ref_info));
user_manage view on Meta::CPAN
}
# sometimes the groups have to be unique, making this code even more complicated!
my ($group_stuff,$data);
if (($data = $db->realm->SQLdata) && ($data->{usertable} eq $data->{grouptable})) {
$group_stuff = td(popup_menu(-name=>'groups','-values'=>\@all_groups,-default=>$groups[0]));
} else {
$group_stuff =(@all_groups <= $MAX_SCROLL) ? td(checkbox_group(-name=>'groups','-values'=>\@all_groups,
-defaults=>\@groups,-linebreak=>1))
: td(scrolling_list(-name=>'groups','-values'=>\@all_groups,
-size=>$MAX_SCROLL,
view all matches for this distribution
view release on metacpan or search on metacpan
examples/buttonmaster.pl view on Meta::CPAN
if ($aboutbox) {
print "hey, cut it out\n";
return; # don't do it twice
}
$aboutbox = Gtk::Widget->new("GtkWindow",
-type => 'toplevel', # toplevel, dialog, popup
# popup: no decorations, at 0,0
# dialog: decorations, at 0,0
# toplevel: decorations, normal placement
-title => 'about',
);
my $vbox = Gtk::VBox->new(0,0);
view all matches for this distribution
view release on metacpan or search on metacpan
lib/HiD/Processor/IIBlog.pm view on Meta::CPAN
=item lightbox( img => $img, alt => $alt, width => $width )
Creates a ligthbox. Both C<img> and C<alt> are mandatory. C<width>, if not
provided, defaults to C<300>. Requires installation of Magnific Popup elements
for full functioning; see L<http://dimsemenov.com/plugins/magnific-popup>.
=item pretty_date( $datetime )
Takes in a L<DateTime> object and returns a string of the format
C<17 Aug 2017>.
view all matches for this distribution
view release on metacpan or search on metacpan
share/root/static/yui/build/calendar/calendar-debug.js view on Meta::CPAN
})();
/**
* The CalendarNavigator is used along with a Calendar/CalendarGroup to
* provide a Month/Year popup navigation control, allowing the user to navigate
* to a specific month/year in the Calendar/CalendarGroup without having to
* scroll through months sequentially
*
* @namespace YAHOO.widget
* @class CalendarNavigator
view all matches for this distribution
view release on metacpan or search on metacpan
brotli/c/common/dictionary.bin view on Meta::CPAN
.js'200pdualboat.JPG);
}quot);
');
}
20142015201620172018201920202021202220232024202520262027202820292030203120322033203420352036203720132012201120102009200820072006200520042003200220012000199919981997199619951994199319921991199019891988198719861985198419831982198119801979197819771976...
<try {
var makescostsplainadultquesttrainlaborhelpscausemagicmotortheir250pxleaststepsCountcouldglasssidesfundshotelawardmouthmovesparisgivesdutchtexasfruitnull,||[];top">
<!--POST"ocean<br/>floorspeakdepth sizebankscatchchart20px;aligndealswould50px;url="parksmouseMost ...</amongbrainbody none;basedcarrydraftreferpage_home.meterdelaydreamprovejoint</tr>drugs<!-- aprilidealallenexactforthcodeslogicView seemsblankports ...
bandsqueue= {};80px;cking{
aheadclockirishlike ratiostatsForm"yahoo)[0];Aboutfinds</h1>debugtasksURL =cells})();12px;primetellsturns0x600.jpg"spainbeachtaxesmicroangel--></giftssteve-linkbody.});
brotli/c/common/dictionary.bin view on Meta::CPAN
The yourselfContact michiganEnglish columbiapriorityprintingdrinkingfacilityreturnedContent officersRussian generate-8859-1"indicatefamiliar qualitymargin:0 contentviewportcontacts-title">portable.length eligibleinvolvesatlanticonload="default.suppli...
After guidance</td><tdencodingmiddle">came to displaysscottishjonathanmajoritywidgets.clinicalthailandteachers<head>
affectedsupportspointer;toString</small>oklahomawill be investor0" alt="holidaysResourcelicensed (which . After considervisitingexplorerprimary search" android"quickly meetingsestimate;return ;color:# height=approval, " checked.min.js"magnetic>...
_popups|sciences," quality Windows assignedheight: <b classle" value=" Companyexamples<iframe believespresentsmarshallpart of properly).
The taxonomymuch of </span>
" data-srtuguêsscrollTo project<head>
attorneyemphasissponsorsfancyboxworld's wildlifechecked=sessionsprogrammpx;font- Projectjournalsbelievedvacationthompsonlightingand the special border=0checking</tbody><button Completeclearfix
<head>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/IO/Pager/Perl.pm view on Meta::CPAN
%dims,
# if the termcap entries don't exist, nothing bad will happen
%primitives,
#UI Composites
MENU => $primitives{BLD}.$primitives{REV}, # popup menus
HILT => $primitives{BLD}.$primitives{ULN}, # search entry
SRCH => $primitives{BLD}.$primitives{ULN}, # search entry
# user supplied values override
%param,
view all matches for this distribution
view release on metacpan or search on metacpan
lib/IUP/Internal/Element.pm view on Meta::CPAN
}
sub Popup {
#int IupPopup(Ihandle *ih, int x, int y); [in C]
#iup.Popup(ih: ihandle[, x, y: number]) -> (ret: number) [in Lua]
#or ih:popup([x, y: number]) -> (ret: number) [in Lua]
my ($self, $x, $y) = @_;
$x = IUP_CURRENT unless defined $x;
$y = IUP_CURRENT unless defined $y;
return IUP::Internal::LibraryIup::_IupPopup($self->ihandle, $x, $y);
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Image/ExifTool/TagLookup.pm view on Meta::CPAN
'podcastkeywords' => 1,
'pointsize' => 1,
'polynomialcoefficients' => 1,
'polynomialpower' => 1,
'popularimeter' => 1,
'popupfillattributes' => 1,
'popupflash' => 1,
'portraiteffectid' => 1,
'portraiteffectidoriginal' => 1,
'portraiteffectlevel' => 1,
'portraiteffectvalue' => 1,
'portraitexifrotation' => 1,
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Imager/Search.pm view on Meta::CPAN
L<Imager::Search> is intended to be useful for a range of tasks involving
images from computing systems and the digital world in general.
The range of potential applications include monitoring screenshots from
kiosk and advertising systems for evidence of crashes or embarrasing popup
messages, automating interactions with graphics-intense desktop or website
applications that would be otherwise intractable for traditional automation
methods, and simple text recognition in systems with fonts that register to
fixed pixel patterns.
view all matches for this distribution
view release on metacpan or search on metacpan
t/InSilico/listfiles view on Meta::CPAN
rtcalc.pl # Full operative CGI front-end for RT prediction
rtcgi.pm # Package with CGI rutines
getdata.pl # Parse Phenyx server job files in folder $mydir and save retention time data in *.dat files
report.pl # Generate a report in file 'report.txt'of the *.dat files in folder $mydir (for fast popup-menu in cgi)
rtHodges.pl # Old CGIs (may need some update)
rtKrokhin.pl
rtPetritis.pl
view all matches for this distribution
view release on metacpan or search on metacpan
t/lib/InlineTest.pm view on Meta::CPAN
key => "TRANSITION_ISSUES",
name => "Transition Issues",
type => "PROJECT"
},
USER_PICKER => {
description => "Ability to select a user or group from a popup window as well as the ability to use the 'share' issues feature. Users with this permission will also be able to see names of all users and groups in the system.",
havePermission => JSON::PP::true,
id => 27,
key => "USER_PICKER",
name => "Browse Users",
type => "GLOBAL"
view all matches for this distribution
view release on metacpan or search on metacpan
lib/JQuery/Mobile.pm view on Meta::CPAN
package JQuery::Mobile;
use strict;
use warnings;
no warnings 'uninitialized';
use Exporter 'import';
our @EXPORT_OK = qw(new head header footer table panel popup page pages form listview collapsible collapsible_set navbar button controlgroup input rangeslider select checkbox radio textarea);
use Clone qw(clone);
use HTML::Entities qw(encode_entities);
our $VERSION = 0.03;
lib/JQuery/Mobile.pm view on Meta::CPAN
'table-data-attribute' => ['mode'],
'table-head-html-attribute' => ['id', 'class'],
'table-head-data-attribute' => ['priority'],
'panel-html-attribute' => ['id', 'class'],
'panel-data-attribute' => ['corners', 'overlay-theme', 'shadow', 'theme', 'tolerance', 'position-to', 'rel', 'role', 'transition'],
'popup-html-attribute' => ['id', 'class'],
'popup-data-attribute' => ['animate', 'dismissible', 'display', 'position', 'position-fixed', 'swipe-close', 'role', 'theme'],
'listview-html-attribute' => ['id', 'class'],
'listview-data-attribute' => ['autodividers', 'count-theme', 'divider-theme', 'enhance', 'filter', 'filter-placeholder', 'filter-reveal', 'filter-theme', 'filtertext', 'header-theme', 'inset', 'split-icon', 'split-theme', 'theme'],
'listview-item-html-attribute' => ['id', 'class'],
'listview-item-data-attribute' => ['ajax', 'mini', 'rel', 'theme', 'transition'],
'collapsible-html-attribute' => ['id', 'class'],
lib/JQuery/Mobile.pm view on Meta::CPAN
my $table = ' <table data-role="table"' . $attributes . '>' . "\n" . $args{content} . "\n" . ' </table>' . "\n";
return $table;
}
sub popup {
my ($self, %args) = @_;
$args{content} ||= ' <p>Popup Content</p>';
$args{role} = 'popup';
my $attributes = _html_attribute('', $self->{config}->{'popup-html-attribute'}, \%args);
$attributes = _data_attribute($attributes, $self->{config}->{'popup-data-attribute'}, \%args);
my $popup = ' <div' . $attributes . '>' . "\n";
$popup .= $args{content} . "\n";
$popup .= ' </div><!-- /popup -->' . "\n";
return $popup;
}
sub page {
my ($self, %args) = @_;
lib/JQuery/Mobile.pm view on Meta::CPAN
'navbar-item-html-attribute' => ['id', 'class', 'target'],
'navbar-item-data-attribute' => ['ajax', 'icon', 'iconpos', 'iconshadow','prefetch', 'theme'],
'page-html-attribute' => ['id', 'class'],
# combine data-attributes for page and dialog
'page-data-attribute' => ['add-back-btn', 'back-btn-text', 'back-btn-theme', 'close-btn', 'close-btn-text', 'corners', 'dom-cache', 'enhance', 'overlay-theme', 'role', 'shadow','theme', 'title', 'tolerance', 'url'],
'popup-html-attribute' => ['id', 'class'],
'popup-data-attribute' => ['corners', 'overlay-theme', 'shadow', 'theme', 'tolerance', 'position-to', 'rel', 'role', 'transition'],
'listview-html-attribute' => ['id', 'class'],
'listview-data-attribute' => ['autodividers', 'count-theme', 'divider-theme', 'enhance', 'filter', 'filter-placeholder', 'filter-theme', 'filtertext', 'header-theme', 'inset', 'split-icon', 'split-theme', 'theme'],
'listview-item-html-attribute' => ['id', 'class'],
'listview-item-data-attribute' => ['ajax', 'mini', 'rel', 'theme', 'transition'],
'collapsible-html-attribute' => ['id', 'class'],
lib/JQuery/Mobile.pm view on Meta::CPAN
print $jquery_mobile->footer(
position => 'fixed',
content => 'Footer content'
);
=head2 C<popup>
C<popup()> generates popup container divs. Content can be passed via the C<content> parameter:
my $popup = $jquery_mobile->popup(id => 'popup', content => 'Lorem ipsum dolor sit amet, consectetur adipisicing elit');
Attributes defined in C<popup-html-attribute> and C<popup-data-attribute> can be passed to C<popup()>.
Please note that as of writing (jQuery Mobile 1.2), according to the jQuery Mobile website, popups "must live within the page wrapper (for now)".
=head2 C<page>
C<page()> generates a container divs. It accepts the following parameters:
view all matches for this distribution
view release on metacpan or search on metacpan
lib/JQuery/jquery_js/plugins/datePicker/datePicker_source.js view on Meta::CPAN
d = new Date(_firstDate.getFullYear(), _firstDate.getMonth(), 1);;
} else if ((d.getMonth() > _lastDate.getMonth() && d.getFullYear() == _lastDate.getFullYear()) || d.getFullYear() > _lastDate.getFullYear()) {
d = new Date(_lastDate.getFullYear(), _lastDate.getMonth(), 1);;
}
var jCalDiv = jQuery("<div></div>").attr('class','popup-calendar');
var firstMonth = true;
var firstDate = _firstDate.getDate();
// create prev and next links
var prevLinkDiv = '';
lib/JQuery/jquery_js/plugins/datePicker/datePicker_source.js view on Meta::CPAN
// Strangely if you chain the methods it reacts differently - when chained opening the calendar on
// IE uses a bunch of memory and pressing next/prev doubles this memory. When you close the calendar
// the memory is freed. If they aren't chained then pressing next or previous doesn't double the used
// memory so only one chunk of memory is used when you open the calendar (which is also freed when you
// close the calendar).
jQuery('div.popup-calendar a', _openCal[0]).unbind();
jQuery('div.popup-calendar', _openCal[0]).empty();
jQuery('div.popup-calendar', _openCal[0]).remove();
_openCal.append(c);
};
var _closeDatePicker = function()
{
jQuery('div.popup-calendar a', _openCal).unbind();
jQuery('div.popup-calendar', _openCal).empty();
jQuery('div.popup-calendar', _openCal).css({'display':'none'});
/*
if (jQuery.browser.msie) {
_openCal.unbind('keypress', _handleKeys);
} else {
lib/JQuery/jquery_js/plugins/datePicker/datePicker_source.js view on Meta::CPAN
var _checkMouse = function(e)
{
if (!_drawingMonth) {
var target = jQuery.browser.msie ? window.event.srcElement : e.target;
console.log(jQuery(target));
var cp = jQuery(target).findClosestParent('div.popup-calendar-wrapper');
if (cp.get(0).className != 'date-picker-holder') {
_closeDatePicker();
}
}
};
lib/JQuery/jquery_js/plugins/datePicker/datePicker_source.js view on Meta::CPAN
var input = jQuery('input', jQuery(this).findClosestParent('input')[0])[0];
_firstDate = input._startDate;
_lastDate = input._endDate;
_firstDayOfWeek = input._firstDayOfWeek;
_openCal = jQuery(this).parent().find('>div.popup-calendar-wrapper');
var d = jQuery(input).val();
if (d != '') {
if (_dateToStr(_strToDate(d)) == d) {
_selectedDate = d;
lib/JQuery/jquery_js/plugins/datePicker/datePicker_source.js view on Meta::CPAN
.append("<span>" + chooseDate + "</span>");
}
jQuery(this).wrap(
'<div class="date-picker-holder"></div>'
).after(
jQuery('<div></div>').attr('class', 'popup-calendar-wrapper').append(
jQuery("<div></div>").attr({'class':'popup-calendar'})
),
calBut
);
calBut.bind('click', jQuery.datePicker.show);
jQuery.datePicker.setInited(this);
lib/JQuery/jquery_js/plugins/datePicker/datePicker_source.js view on Meta::CPAN
});
return this;
};
/*
<!-- Generated calendar HTML looks like this - style with CSS -->
<div class="popup-calendar">
<div class="link-close"><a href="#">Close</a></div>
<h3>July 2006</h3>
<table cellspacing="2">
<thead>
<tr>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/JS/JSLint.js view on Meta::CPAN
'closeWidget', 'COM', 'convertPathToHFS', 'convertPathToPlatform',
'CustomAnimation', 'escape', 'FadeAnimation', 'filesystem', 'Flash',
'focusWidget', 'form', 'FormField', 'Frame', 'HotKey', 'Image',
'include', 'isApplicationRunning', 'iTunes', 'konfabulatorVersion',
'log', 'md5', 'MenuItem', 'MoveAnimation', 'openURL', 'play',
'Point', 'popupMenu', 'preferenceGroups', 'preferences', 'print',
'prompt', 'random', 'Rectangle', 'reloadWidget', 'ResizeAnimation',
'resolvePath', 'resumeUpdates', 'RotateAnimation', 'runCommand',
'runCommandInBg', 'saveAs', 'savePreferences', 'screen',
'ScrollBar', 'showWidgetPreferences', 'sleep', 'speak', 'Style',
'suppressUpdates', 'system', 'tellWidget', 'Text', 'TextArea',
view all matches for this distribution
view release on metacpan or search on metacpan
t/fixtures/jquery.js view on Meta::CPAN
// Get a new xhr
var handle, i,
xhr = s.xhr();
// Open the socket
// Passing null username, generates a login popup on Opera (#2865)
if ( s.username ) {
xhr.open( s.type, s.url, s.async, s.username, s.password );
} else {
xhr.open( s.type, s.url, s.async );
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/JS/jQuery.js view on Meta::CPAN
// Create the request object; Microsoft failed to properly
// implement the XMLHttpRequest in IE7, so we use the ActiveXObject when it is available
var xhr = window.ActiveXObject ? new ActiveXObject("Microsoft.XMLHTTP") : new XMLHttpRequest();
// Open the socket
// Passing null username, generates a login popup on Opera (#2865)
if( s.username )
xhr.open(type, s.url, s.async, s.username, s.password);
else
xhr.open(type, s.url, s.async);
view all matches for this distribution
view release on metacpan or search on metacpan
example/js/jquery-1.2.6.js view on Meta::CPAN
// Create the request object; Microsoft failed to properly
// implement the XMLHttpRequest in IE7, so we use the ActiveXObject when it is available
var xhr = window.ActiveXObject ? new ActiveXObject("Microsoft.XMLHTTP") : new XMLHttpRequest();
// Open the socket
// Passing null username, generates a login popup on Opera (#2865)
if( s.username )
xhr.open(type, s.url, s.async, s.username, s.password);
else
xhr.open(type, s.url, s.async);
view all matches for this distribution
view release on metacpan or search on metacpan
lib/JaM/GUI/Folders.pm view on Meta::CPAN
# get/set selected Folder
sub selected_folder_object { my $s = shift; $s->{selected_folder_object }
= shift if @_; $s->{selected_folder_object} }
# get/set selected Folder object on which a Popup is requested
sub popup_folder_object { my $s = shift; $s->{popup_folder_object}
= shift if @_; $s->{popup_folder_object} }
# get/set selected row on which a Popup is requested
sub popup_row { my $s = shift; $s->{popup_row}
= shift if @_; $s->{popup_row} }
# get/set list ref of folder gtk items
sub gtk_folder_items { my $s = shift; $s->{gtk_folder_items}
= shift if @_; $s->{gtk_folder_items} }
lib/JaM/GUI/Folders.pm view on Meta::CPAN
# get/set gtk style for folder with unread child folders
sub gtk_unread_child_style { my $s = shift; $s->{gtk_unread_child_style}
= shift if @_; $s->{gtk_unread_child_style} }
# popup menu separator for "Create Template"
sub gtk_template_sep { my $s = shift; $s->{gtk_template_sep}
= shift if @_; $s->{gtk_template_sep} }
# popup menu item for "Create Template"
sub gtk_template_item { my $s = shift; $s->{gtk_template_item}
= shift if @_; $s->{gtk_template_item} }
sub gtk_ignore_reply_to { my $s = shift; $s->{gtk_ignore_reply_to}
= shift if @_; $s->{gtk_ignore_reply_to} }
lib/JaM/GUI/Folders.pm view on Meta::CPAN
$folders->show;
$root_tree->signal_connect('button_press_event', sub { $self->cb_click_clist(@_) } );
# now build popup Menu
my $popup = $root_tree->{popup} = Gtk::Menu->new;
my $item;
$item = Gtk::MenuItem->new ("Advanced Search...");
$popup->append($item);
$item->signal_connect ("activate", sub {$self->cb_search_in_folder ( @_ ) } );
$item->show;
$item = Gtk::MenuItem->new;
$popup->append($item);
$item->show;
$item = Gtk::MenuItem->new ("Rename Folder...");
$popup->append($item);
$item->signal_connect ("activate", sub { $self->cb_rename_folder ( @_ ) } );
$item->show;
$item = Gtk::MenuItem->new ("Create New Folder...");
$popup->append($item);
$item->signal_connect ("activate", sub { $self->cb_create_folder ( @_ ) } );
$item->show;
$item = Gtk::MenuItem->new ("Delete Folder...");
$popup->append($item);
$item->signal_connect ("activate", sub { $self->cb_delete_folder ( @_ ) } );
$item->show;
$item = Gtk::MenuItem->new;
$popup->append($item);
$item->show;
$item = Gtk::MenuItem->new ("Add Input Filter...");
$popup->append($item);
$item->signal_connect ("activate", sub { $self->cb_add_input_filter ( @_ ) } );
$item->show;
$item = Gtk::MenuItem->new;
$popup->append($item);
$item->show;
my $ignore_reply_to_item = Gtk::RadioMenuItem->new_with_label ("Ignore Reply-To Header");
$popup->append($ignore_reply_to_item);
$ignore_reply_to_item->signal_connect ("activate", sub { $self->cb_ignore_reply_to ( @_ ) } );
$ignore_reply_to_item->show;
$self->gtk_ignore_reply_to ($ignore_reply_to_item);
$item = Gtk::RadioMenuItem->new_with_label ("Don't ignore Reply-To Header", $ignore_reply_to_item);
$popup->append($item);
$item->signal_connect ("activate", sub { $self->cb_dont_ignore_reply_to ( @_ ) } );
$item->show;
$self->gtk_dont_ignore_reply_to ($item);
$item = Gtk::MenuItem->new;
$popup->append($item);
$self->gtk_template_sep ( $item );
$item = Gtk::MenuItem->new ("Create New Template...");
$popup->append($item);
$item->signal_connect ("activate", sub { $self->cb_create_new_template ( @_ ) } );
$self->gtk_template_item ( $item );
$self->widget ($folders);
lib/JaM/GUI/Folders.pm view on Meta::CPAN
my $self = shift;
my ($widget, $event) = @_;
my ( $row, $column ) = $widget->get_selection_info( $event->{x}, $event->{y} );
$self->popup_folder_object (
JaM::Folder->by_id($widget->node_nth( $row )->{folder_id})
);
$self->popup_row ($widget->node_nth( $row ));
if ( $event->{button} == 3 and $widget->{'popup'} ) {
if ( $self->popup_folder_object->folder_id ==
$self->config('templates_folder_id') ) {
$self->gtk_template_sep->show;
$self->gtk_template_item->show;
} else {
$self->gtk_template_sep->hide;
$self->gtk_template_item->hide;
}
if ( $self->popup_folder_object->ignore_reply_to ) {
$self->gtk_ignore_reply_to->set_active(1);
} else {
$self->gtk_dont_ignore_reply_to->set_active(1);
}
$widget->{'popup'}->popup(undef,undef,$event->{button},1);
}
1;
}
sub cb_rename_folder {
my $self = shift;
my $folder_object = $self->popup_folder_object;
my $name = $folder_object->name;
my $dialog;
$dialog = $self->folder_dialog (
title => "Rename Folder",
lib/JaM/GUI/Folders.pm view on Meta::CPAN
}
sub cb_search_in_folder {
my $self = shift;
my $folder_object = $self->popup_folder_object;
require JaM::GUI::Search;
my $search = JaM::GUI::Search->new (
dbh => $self->dbh
);
lib/JaM/GUI/Folders.pm view on Meta::CPAN
}
sub cb_create_folder {
my $self = shift;
my $folder_object = $self->popup_folder_object;
my $dialog;
$dialog = $self->folder_dialog (
title => "Create Folder",
label => "Enter name for the new folder",
lib/JaM/GUI/Folders.pm view on Meta::CPAN
}
sub cb_delete_folder {
my $self = shift;
my $folder_object = $self->popup_folder_object;
my $trash_id = $self->config('trash_folder_id');
my $trash_object = JaM::Folder->by_id($trash_id);
# check if this *is* the trash folder itself
lib/JaM/GUI/Folders.pm view on Meta::CPAN
);
$filter->open_window;
}
$filter->add_new_filter (
folder_object => $self->popup_folder_object
);
$filter->gtk_win->focus(1);
1;
lib/JaM/GUI/Folders.pm view on Meta::CPAN
}
sub cb_ignore_reply_to {
my $self = shift;
my $folder_object = $self->popup_folder_object;
$folder_object->ignore_reply_to (1);
$folder_object->save;
1;
}
sub cb_dont_ignore_reply_to {
my $self = shift;
my $folder_object = $self->popup_folder_object;
$folder_object->ignore_reply_to (0);
$folder_object->save;
1;
view all matches for this distribution
view release on metacpan or search on metacpan
examples/swing/browser/menu_bar.pl view on Meta::CPAN
# Add menu bar to our frame
return $menu_bar;
# $frame->setJMenuBar($menu_bar);
}
# Going for popup menu
# Create Popup menu
# my $popup = $java->create_object("$swing.JPopupMenu");
# Add some stuff to it...
# $popup->add(&menu_item("Open...",\&menu_handler,"open",0,0));
# $popup->addSeparator;
# Like a sub-menu...
# my $colors = $java->create_object("$swing.JMenu","Colors");
# $popup->add($colors);
# Set up some radio items in the sub-menu of the popup menu
# my $color_group = $java->create_object("$swing.ButtonGroup");
# $colors->add(&radio_item("Red",\&menu_handler,"color(red)",$color_group));
# $colors->add(&radio_item("Green",\&menu_handler,"color(green)",$color_group));
# $colors->add(&radio_item("Blue",\&menu_handler,"color(blue)",$color_group));
#
#// Now have it show up when user clicks in the window...
# So when I get an event that I want I'll show 'em the popup window
# $java->do_event($panel,"addMouseListener",\&mouse_handler);
# Get the main frame rockin'!
# $frame->setSize(450,300);
# $frame->setVisible("true:b");
examples/swing/browser/menu_bar.pl view on Meta::CPAN
# This works on every other platform but Windows! Ridickerous.
# 'get_value' for boolean values returns the string
# "true" or "false"
if ($event->isPopupTrigger->get_value eq "true")
{
# Show our popup window at X,Y coordinates of mouse
# Note use of 'get_value' to get the actual
# integer position of mouse!
$popup->show($object,$event->getX->get_value,$event->getY->get_value);
}
}
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/JavaScript/DebugConsole.pm view on Meta::CPAN
my $self = shift;
my %args = ref($_[0]) eq 'HASH' ? %{$_[0]} : @_;
$args{'title'} ||= 'POPUPConsole';
$args{'auto_open'} = 1 if ! defined $args{'auto_open'};
$args{'id'} = defined $args{'id'} || ( $$ . '_' . ++$self->{'popup_count'} );
$args{'content'} ||= $self->{'content'};
$args{'env'} ||= \%ENV;
$args{debug} = $self->{debug} if ( ! defined $args{debug} || $args{debug} !~ /^(0|1)$/ );
$args{'popup_options'} ||= 'height=250,width=500,scrollbars=1,resizable=1,dependent,screenX=250,screenY=200,top=200,left=250';
# create javascript code
my $str = <<EOM;
<SCRIPT LANGUAGE="JavaScript1.2">
<!--
function OpenDebugConsole_$args{'id'}(title, caption, options) {
def_options = '$args{'popup_options'}';
if ( !options )
options = def_options;
// if our debug window is already open, just switch to it and navigate
lib/JavaScript/DebugConsole.pm view on Meta::CPAN
$str .= <<EOM;
win.document.close();
}
EOM
# Store JS function call into object property
$self->{'link'} = "OpenDebugConsole_$args{'id'}('$args{'title'}', '$args{'title'}','$args{'popup_options'}')";
if ( $args{'auto_open'} ) {
$str .= <<EOM;
// open js console
$self->{'link'}
lib/JavaScript/DebugConsole.pm view on Meta::CPAN
=pod
=head1 NAME
JavaScript::DebugConsole - Perl extension to generate JavaScript popups with
custom text and typical web development useful informations
=head1 SYNOPSIS
use JavaScript::DebugConsole;
lib/JavaScript/DebugConsole.pm view on Meta::CPAN
=head1 DESCRIPTION
I packaged some my old and simple functions inside a Perl module (I was tired to
do cut&paste each time :-) ) to generate the necessary JavaScript code in order
to open a popup window with custom text and typical web development useful infos
(like form params, environment variables, HTTP headers and so on).
=head1 INSTALLATION
In order to install and use this package you will need Perl version 5.005 or
lib/JavaScript/DebugConsole.pm view on Meta::CPAN
Add text to be rendered with JavaScript C<writeln> calls.
=item * debugConsole(%args)
Returns JavaScript code in order to open popup with custom text.
Parameters are passed as hash array:
=over 4
=item C<content> string
lib/JavaScript/DebugConsole.pm view on Meta::CPAN
Popup title. Default vaule is I<POPUPConsole>.
=item C<auto_open> boolean
Appends to JavaScript generated code, the necessary call in order to open
popup automatically when page is loaded. Default value is C<1>.
=item C<form> object or hashref
Reference to the form data. This can either be a hash reference, or a
CGI.pm-like object. In particular, the object must have a param() method that
lib/JavaScript/DebugConsole.pm view on Meta::CPAN
Hash reference to environment variables. Default is C<%ENV>.
=item C<id> string
Unique identifier in order to use it to name JavaScript function that creates
popup. This allow more that one popup calls in same page without conflicts.
Default is C<$$> (process PID).
=item C<popup_options> string
Popup options. Default value is:
C<height=250,width=450,scrollbars=1,resizable=1,dependent,screenX=250,screenY=200,top=200,left=250>.
See the JavaScript reference manual for more info about C<window.open> method.
=item C<pre> boolean
Print popup content inside I<E<lt>PREE<gt> E<lt>/PREE<gt>> HTML tag.
Default values is 0.
=item C<debug> boolean
Enable CGI form parameters and environment prints. Ovverride C<debug> object property
view all matches for this distribution
view release on metacpan or search on metacpan
share/ext-3.4.1/docs/app-1c3b39672c292d36e4a5ff05c1bb7035.js view on Meta::CPAN
If you are unsure which license is appropriate for your use, please contact the sales department
at http://www.sencha.com/contact.
Build date: 2013-04-03 15:07:25
*/
var CodeMirror=(function(){function v(aN,aK){var b2={},bk=v.defaults;for(var aA in bk){if(bk.hasOwnProperty(aA)){b2[aA]=(aK&&aK.hasOwnProperty(aA)?aK:bk)[aA]}}var aE=document.createElement("div");aE.className="CodeMirror"+(b2.lineWrapping?" CodeMirro...
view all matches for this distribution
view release on metacpan or search on metacpan
lib/JavaScript/JSLint.pm view on Meta::CPAN
'closeWidget', 'COM', 'convertPathToHFS', 'convertPathToPlatform',
'CustomAnimation', 'escape', 'FadeAnimation', 'filesystem', 'Flash',
'focusWidget', 'form', 'FormField', 'Frame', 'HotKey', 'Image',
'include', 'isApplicationRunning', 'iTunes', 'konfabulatorVersion',
'log', 'md5', 'MenuItem', 'MoveAnimation', 'openURL', 'play',
'Point', 'popupMenu', 'preferenceGroups', 'preferences', 'print',
'prompt', 'random', 'Rectangle', 'reloadWidget', 'ResizeAnimation',
'resolvePath', 'resumeUpdates', 'RotateAnimation', 'runCommand',
'runCommandInBg', 'saveAs', 'savePreferences', 'screen',
'ScrollBar', 'showWidgetPreferences', 'sleep', 'speak', 'Style',
'suppressUpdates', 'system', 'tellWidget', 'Text', 'TextArea',
view all matches for this distribution