view release on metacpan or search on metacpan
socialcalc/SocialCalcServersideUtilities.pm view on Meta::CPAN
}
$estring =~ s!\[(http:.+?)\s+(.+?)\]!'{{lt}}a href={{quot}}' . URLEncode("$1") . "{{quot}}{{gt}}$2\{{lt}}/a{{gt}}"!egs; # Wiki-style links
$estring =~ s!\[link:(.+?)\s+(.+?)\:link]!'{{lt}}a href={{quot}}' . URLEncode("$1") . "{{quot}}{{gt}}$2\{{lt}}/a{{gt}}"!egs; # [link:url text:link] to link
$estring =~ s!\[popup:(.+?)\s+(.+?)\:popup]!'{{lt}}a href={{quot}}' . URLEncode("$1") . "{{quot}} target={{quot}}_blank{{quot}}{{gt}}$2\{{lt}}/a{{gt}}"!egs; # [popup:url text:popup] to link with popup result
$estring =~ s!\[image:(.+?)\s+(.+?)\:image]!'{{lt}}img src={{quot}}' . URLEncode("$1") . '{{quot}} alt={{quot}}' . SpecialCharsNL("$2") . '{{quot}}{{gt}}'!egs; # [image:url alt-text:image] for images
# $string =~ s!\[page:(.+?)(\s+(.+?))?]!wiki_page_command($1,$3, $linkstyle)!egs; # [page:pagename text] to link to other pages on this site
# Convert &, <, >, "
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/TimeTracker/Gtk3StatusIcon.pm view on Meta::CPAN
my $quit = Gtk3::ImageMenuItem->new_from_stock('gtk-quit');
$quit->signal_connect( activate => sub { Gtk3->main_quit } );
$menu->append($quit);
$menu->show_all();
$icon->signal_connect( 'activate' => sub { $menu->popup_at_pointer } );
my $loop = IO::Async::Loop::Glib->new();
my $file = IO::Async::File->new(
filename => $TRACKER_HOME,
view all matches for this distribution
view release on metacpan or search on metacpan
my $cui = Curses::UI->new;
my $win = $cui->add('window_id', 'Window');
$win->set_binding(\&exit, "\cQ", "\cC");
# Popup menu.
my $popupbox = $win->add(
'mypopupbox', 'Popupmenu',
'-labels' => {
map { $_, $_ } @{$self->{'_unicode_block_list'}},
},
'-onchange' => sub {
my $cui_self = shift;
$self->_print_block($cui_self->get);
exit 0;
},
'-values' => $self->{'_unicode_block_list'},
);
$popupbox->focus;
# Loop.
$cui->mainloop;
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/XUL/XML.pm view on Meta::CPAN
grid grippy groupbox
hbox
iframe image
key keyset
label listbox listcell listcol listcols listhead listheader listitem
member menu menubar menuitem menulist menupopup menuseparator
observes overlay
page popup popupset preference preferences prefpane prefwindow progressmeter
radio radiogroup resizer richlistbox richlistitem row rows rule
script scrollbar scrollbox scrollcorner separator spacer splitter stack
statusbar statusbarpanel stringbundle stringbundleset
tab tabbrowser tabbox tabpanels tabs template textnode textbox titlebar
toolbar toolbarbutton toolbaritem toolbarpalette toolbarseparator
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/dropboxapi.pm view on Meta::CPAN
/product/chrome-extentions/google-tasks-checker-plus/src/icon.gif
/product/chrome-extentions/google-tasks-checker-plus/src/jquery-1.4.2.min.js
/product/chrome-extentions/google-tasks-checker-plus/src/main.js
/product/chrome-extentions/google-tasks-checker-plus/src/manifest.json
/product/chrome-extentions/google-tasks-checker-plus/src/options.html
/product/chrome-extentions/google-tasks-checker-plus/src/popup.html
/product/chrome-extentions/google-tasks-checker-plus/src/reset.css
=head3 printf option ( -p )
see also list command's printf option.
lib/App/dropboxapi.pm view on Meta::CPAN
skip icon.gif
skip jquery-1.4.2.min.js
skip main.js
skip manifest.json
skip options.html
skip popup.html
skip reset.css
** delete **
skip background.html
remove background.html.tmp
skip icon.gif
skip jquery-1.4.2.min.js
skip main.js
skip manifest.json
skip options.html
skip popup.html
skip reset.css
=head2 cp
copy file or directory.
view all matches for this distribution
view release on metacpan or search on metacpan
t/10-patterns.t view on Meta::CPAN
is_deeply(parse_line('##.werbungamazon'),
{},
'Discard element hiding');
is_deeply(parse_line('||amazon.de/s/*&tag=$popup,domain=bluray-disc.de'),
{},
'Discard $popup');
is_deeply(parse_line('||pizza.de^*/banner_$third-party'),
{},
'Discard $third-party');
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/mirai/Tickit.pm view on Meta::CPAN
} under => $widget{desktop}
}
=head2 app_about
Shows the C< About > dialog popup.
=cut
sub app_about {
my $vbox = shift;
view all matches for this distribution
view release on metacpan or search on metacpan
t/oddmuse-wiki.pl view on Meta::CPAN
my $error = ValidId($id);
ReportError($error, '400 BAD REQUEST') if $error;
return 1;
}
sub ResolveId { # return css class, resolved id, title (eg. for popups), exist-or-not
my $id = shift;
return ('local', $id, '', 1) if $IndexHash{$id};
return ('', '', '', '');
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/remarkpl/public/remark.min.js view on Meta::CPAN
}),e.COMMENT("#cs","#ce"),e.COMMENT("#comments-start","#comments-end")]},n={begin:"\\$[A-z0-9_]+"},i={className:"string",variants:[{begin:/"/,end:/"/,contains:[{begin:/""/,relevance:0}]},{begin:/'/,end:/'/,contains:[{begin:/''/,relevance:0}]}]},l={va...
beginKeywords:"class interface",end:/[{;=]/,illegal:/[^\s:]/,contains:[e.TITLE_MODE,e.C_LINE_COMMENT_MODE,e.C_BLOCK_COMMENT_MODE]},{beginKeywords:"namespace",end:/[{;=]/,illegal:/[^\s:]/,contains:[e.inherit(e.TITLE_MODE,{begin:"[a-zA-Z](\\.?\\w)*"}),...
},a={className:"params",begin:/\(/,end:/\)/,excludeBegin:!0,excludeEnd:!0},r={className:"symbol",variants:[{begin:/\=[lgenxc]=/},{begin:/\$/}]},s={className:"comment",variants:[{begin:"'",end:"'"},{begin:'"',end:'"'}],illegal:"\\n",contains:[e.BACKSL...
},{begin:":\\s*"+t}]}]}}},{name:"hsp",create:function(e){return{case_insensitive:!0,lexemes:/[\w\._]+/,keywords:"goto gosub return break repeat loop continue wait await dim sdim foreach dimtype dup dupptr end stop newmod delmod mref run exgoto on mca...
},contains:[t,{className:"keyword",begin:"\\bend\\sif\\b"},{className:"function",beginKeywords:"function",end:"$",contains:[t,s,e.APOS_STRING_MODE,e.QUOTE_STRING_MODE,e.BINARY_NUMBER_MODE,e.C_NUMBER_MODE,r]},{className:"function",begin:"\\bend\\s+",e...
contains:[{className:"comment",begin:/\(\*/,end:/\*\)/},e.APOS_STRING_MODE,e.QUOTE_STRING_MODE,e.C_NUMBER_MODE,{begin:/\{/,end:/\}/,illegal:/:/}]}}},{name:"matlab",create:function(e){var t=[e.C_NUMBER_MODE,{className:"string",begin:"'",end:"'",contai...
illegal:"</",contains:[e.C_NUMBER_MODE,e.APOS_STRING_MODE,e.QUOTE_STRING_MODE,{className:"string",begin:"`",end:"`",contains:[e.BACKSLASH_ESCAPE]},{begin:"[\\$\\%\\@](\\^\\w\\b|#\\w+|[^\\s\\w{]|{\\w+}|\\w+)"},e.C_LINE_COMMENT_MODE,e.C_BLOCK_COMMENT_M...
contains:[i]});return{aliases:["ps"],lexemes:/-?[A-z\.\-]+/,case_insensitive:!0,keywords:{keyword:"if else foreach return function do while until elseif begin for trap data dynamicparam end break throw param continue finally in switch exit filter try...
},{className:"meta",begin:"#\\!?\\[",end:"\\]",contains:[{className:"meta-string",begin:/"/,end:/"/}]},{className:"class",beginKeywords:"type",end:";",contains:[e.inherit(e.UNDERSCORE_TITLE_MODE,{endsParent:!0})],illegal:"\\S"},{className:"class",beg...
literal:"true false nil"},contains:[e.C_LINE_COMMENT_MODE,e.C_BLOCK_COMMENT_MODE,e.NUMBER_MODE,a,t.preprocessor],illegal:/#/}}},{name:"sql",create:function(e){var t=e.COMMENT("--","$");return{case_insensitive:!0,illegal:/[<>{}*#]/,contains:[{beginKey...
return{aliases:["styl"],case_insensitive:!1,keywords:"if else for in",illegal:"("+o.join("|")+")",contains:[e.QUOTE_STRING_MODE,e.APOS_STRING_MODE,e.C_LINE_COMMENT_MODE,e.C_BLOCK_COMMENT_MODE,a,{begin:"\\.[a-zA-Z][a-zA-Z0-9_-]*"+i,returnBegin:!0,cont...
built_in:"ip eip rip al ah bl bh cl ch dl dh sil dil bpl spl r8b r9b r10b r11b r12b r13b r14b r15b ax bx cx dx si di bp sp r8w r9w r10w r11w r12w r13w r14w r15w eax ebx ecx edx esi edi ebp esp eip r8d r9d r10d r11d r12d r13d r14d r15d rax rbx rcx rdx...
"atelier-lakeside-light":".hljs-atelier-lakeside-light .hljs-comment,.hljs-atelier-lakeside-light .hljs-quote{color:#5a7b8c}.hljs-atelier-lakeside-light .hljs-variable,.hljs-atelier-lakeside-light .hljs-template-variable,.hljs-atelier-lakeside-light ...
grayscale:".hljs-grayscale .hljs{display:block;overflow-x:auto;padding:.5em;color:#333;background:#fff}.hljs-grayscale .hljs-comment,.hljs-grayscale .hljs-quote{color:#777;font-style:italic}.hljs-grayscale .hljs-keyword,.hljs-grayscale .hljs-selector...
"solarized-dark":".hljs-solarized-dark .hljs{display:block;overflow-x:auto;padding:.5em;background:#002b36;color:#839496}.hljs-solarized-dark .hljs-comment,.hljs-solarized-dark .hljs-quote{color:#586e75}.hljs-solarized-dark .hljs-keyword,.hljs-solari...
containerLayout:'<div class="remark-notes-area">\n <div class="remark-top-area">\n <div class="remark-toolbar">\n <a class="remark-toolbar-link" href="#increase">+</a>\n <a class="remark-toolbar-link" href="#decrease">-</a>\n <span...
view all matches for this distribution
view release on metacpan or search on metacpan
share/revealjs/plugin/highlight/highlight.esm.js view on Meta::CPAN
function e(t){return(e="function"==typeof Symbol&&"symbol"==typeof Symbol.iterator?function(e){return typeof e}:function(e){return e&&"function"==typeof Symbol&&e.constructor===Symbol&&e!==Symbol.prototype?"symbol":typeof e})(t)}function t(e,t){if(!(...
/*!
* reveal.js plugin that adds syntax highlight support.
*/
var of={id:"highlight",HIGHLIGHT_STEP_DELIMITER:"|",HIGHLIGHT_LINE_DELIMITER:",",HIGHLIGHT_LINE_RANGE_DELIMITER:"-",hljs:rf,init:function(e){var t=e.getConfig().highlight||{};t.highlightOnLoad="boolean"!=typeof t.highlightOnLoad||t.highlightOnLoad,t....
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/sdview/Output/Tickit.pm view on Meta::CPAN
C<End> or C<< > >> - scroll to bottom
=item *
C<F9> - open the outline view popup. See Below.
=item *
C</> - start a regexp search in the document body. See Below.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Gtk2/Ex/FileLocator/RecycleButton.pm view on Meta::CPAN
$this
);
$this->add($button);
#popup menu
$this->{menu} = new Gtk2::Menu;
$this->{menu}->show;
$this->signal_connect_after( 'map' => \&on_map );
lib/Gtk2/Ex/FileLocator/RecycleButton.pm view on Meta::CPAN
sub on_button_release_event {
my ( $button, $event, $this ) = @_;
#printf "on_button_release_event %s\n", $this->get_filename;
$this->{menu}
->popup( undef, undef, undef, undef, $event->button, $event->time );
return;
}
sub on_menu_activated {
my ( $item, $this ) = @_;
view all matches for this distribution
view release on metacpan or search on metacpan
share/files/public/skins/default/jquery-ui-1.9.1.custom/development-bundle/docs/autocomplete.html view on Meta::CPAN
<h3>appendTo<span class="option-type"><strong>Type: </strong><a href="http://api.jquery.com/Types#Selector">Selector</a></span>
</h3>
<div class="default">
<strong>Default: </strong><code>"body"</code>
</div>
<div>Which element the menu should be appended to. Override this when the autocomplete is inside a <code>position: fixed</code> element. Otherwise the popup menu would still scroll with the page.</div>
<strong>Code examples:</strong><p>Initialize the autocomplete with the appendTo option specified:</p>
<div class="syntaxhighlighter nogutter "><table border="0" cellpadding="0" cellspacing="0"><tbody><tr><td class="code"><div class="container"><div class="line number1 index0 alt2"><code class="plain">$( </code><code class="string">".selector"</code>...
<p>Get or set the appendTo option, after initialization:</p>
<div class="syntaxhighlighter nogutter "><table border="0" cellpadding="0" cellspacing="0"><tbody><tr><td class="code"><div class="container"><div class="line number1 index0 alt2"><code class="comments">// getter</code></div><div class="line number2...
</div>
view all matches for this distribution
view release on metacpan or search on metacpan
share/root/jquery-ui-1.11.1/jquery-ui.min.js view on Meta::CPAN
* http://jqueryui.com
* Includes: core.js, widget.js, mouse.js, position.js, accordion.js, autocomplete.js, button.js, datepicker.js, dialog.js, draggable.js, droppable.js, effect.js, effect-blind.js, effect-bounce.js, effect-clip.js, effect-drop.js, effect-explode.js, ef...
* Copyright 2014 jQuery Foundation and other contributors; Licensed MIT */
(function(e){"function"==typeof define&&define.amd?define(["jquery"],e):e(jQuery)})(function(e){function t(t,s){var n,a,o,r=t.nodeName.toLowerCase();return"area"===r?(n=t.parentNode,a=n.name,t.href&&a&&"map"===n.nodeName.toLowerCase()?(o=e("img[usema...
}})},_destroy:function(){this.element.removeAttr("aria-activedescendant").find(".ui-menu").addBack().removeClass("ui-menu ui-widget ui-widget-content ui-menu-icons ui-front").removeAttr("role").removeAttr("tabIndex").removeAttr("aria-labelledby").rem...
}catch(n){}return!0},_showDatepicker:function(t){if(t=t.target||t,"input"!==t.nodeName.toLowerCase()&&(t=e("input",t.parentNode)[0]),!e.datepicker._isDisabledDatepicker(t)&&e.datepicker._lastInput!==t){var i,n,a,o,h,l,u;i=e.datepicker._getInst(t),e.d...
},_generatePosition:function(e,t){var i,s,n,a,o=this.options,r=this._isRootNode(this.scrollParent[0]),h=e.pageX,l=e.pageY;return r&&this.offset.scroll||(this.offset.scroll={top:this.scrollParent.scrollTop(),left:this.scrollParent.scrollLeft()}),t&&(t...
if(t.keyCode===e.ui.keyCode.TAB&&!t.isDefaultPrevented()){var i=this.uiDialog.find(":tabbable"),s=i.filter(":first"),n=i.filter(":last");t.target!==n[0]&&t.target!==this.uiDialog[0]||t.shiftKey?t.target!==s[0]&&t.target!==this.uiDialog[0]||!t.shiftKe...
f&&e.effects.save(i,l),i.from={height:s.height*a.from.y,width:s.width*a.from.x,outerHeight:s.outerHeight*a.from.y,outerWidth:s.outerWidth*a.from.x},i.to={height:s.height*a.to.y,width:s.width*a.to.x,outerHeight:s.height*a.to.y,outerWidth:s.width*a.to....
return e.ui.ddmanager&&(e.ui.ddmanager.current=this),e.ui.ddmanager&&!o.dropBehaviour&&e.ui.ddmanager.prepareOffsets(this,t),this.dragging=!0,this.helper.addClass("ui-sortable-helper"),this._mouseDrag(t),!0},_mouseDrag:function(t){var i,s,n,a,o=this....
}).addClass("ui-tabs-anchor").attr({role:"presentation",tabIndex:-1}),this.panels=e(),this.anchors.each(function(i,s){var n,a,o,r=e(s).uniqueId().attr("id"),h=e(s).closest("li"),l=h.attr("aria-controls");t._isLocal(s)?(n=s.hash,o=n.substring(1),a=t.e...
view all matches for this distribution
view release on metacpan or search on metacpan
],
"cookies": [],
"content": {
"size": 213057,
"mimeType": "text/html",
"text": "<!doctype html><html itemscope=\"\" itemtype=\"http://schema.org/WebPage\" lang=\"en-AU\"><head><meta content=\"/images/branding/googleg/1x/googleg_standard_color_128dp.png\" itemprop=\"image\"><link href=\"/images/branding/produ...
},
"redirectURL": "",
"headersSize": -1,
"bodySize": -1,
"_transferSize": 68060
],
"cookies": [],
"content": {
"size": 436180,
"mimeType": "text/javascript",
"text": "/* _GlobalPrefix_ */\n/* _Module_:quantum */\ntry{\nvar s_,s_aaa=\"function\"==typeof Object.defineProperties?Object.defineProperty:function(a,b,c){if(c.get||c.set)throw new TypeError(\"ES3 does not support getters and setters.\"...
},
"redirectURL": "",
"headersSize": -1,
"bodySize": 0,
"_transferSize": 0
],
"cookies": [],
"content": {
"size": 108222,
"mimeType": "text/javascript",
"text": "/* _GlobalPrefix_ */\n/* _Module_:sy1p */\ntry{\nvar s_vja,s_wja,s_1i,s_xja,s_2i,s_yja={};s_D(\"sy1p\");var s_3i=function(a){s_K(this,a,0,2,null,null)};s_g(s_3i,s_J);s_3i.prototype.jh=function(){return s_L(this,1)};var s_zja={};v...
},
"redirectURL": "",
"headersSize": -1,
"bodySize": -1,
"_transferSize": 36140
],
"cookies": [],
"content": {
"size": 122055,
"mimeType": "text/javascript",
"text": "/* JS */ gapi.loaded_0(function(_){var window=this;\nvar ba,ca,da,ha,ia,Fa,Ga;\nfor(_.g,_.n=function(a){return function(){return ba[a].apply(this,arguments)}},_.r=function(a,b){return ba[a]=b},_._DumpException=function(a){throw a...
},
"redirectURL": "",
"headersSize": -1,
"bodySize": 0,
"_transferSize": 0
view all matches for this distribution
view release on metacpan or search on metacpan
unzip-6.0/amiga/filedate.c view on Meta::CPAN
static char space[ENVSIZE];
struct Process *me = (void *) FindTask(NULL);
void *old_window = me->pr_WindowPtr;
char *ret = NULL;
me->pr_WindowPtr = (void *) -1; /* suppress any "Please insert" popups */
if (SysBase->LibNode.lib_Version >= ReqVers) {
if (GetVar((char *) var, space, ENVSIZE - 1, /*GVF_GLOBAL_ONLY*/ 0) > 0)
ret = space;
} else { /* early AmigaDOS, get env var the crude way */
BPTR hand, foot, spine;
unzip-6.0/amiga/filedate.c view on Meta::CPAN
{
struct Process *me = (void *) FindTask(NULL);
void *old_window = me->pr_WindowPtr;
int ret = -1;
me->pr_WindowPtr = (void *) -1; /* suppress any "Please insert" popups */
if (SysBase->LibNode.lib_Version >= ReqVers)
ret = !SetVar((char *)var, (char *)value, -1, GVF_GLOBAL_ONLY | LV_VAR);
else {
BPTR hand, foot, spine;
long len = value ? strlen(value) : 0;
unzip-6.0/amiga/filedate.c view on Meta::CPAN
void *old_window = me->pr_WindowPtr;
BPTR eh;
int z, valid = FALSE;
/* read timezone from locale.library if TZ envvar missing */
me->pr_WindowPtr = (void *) -1; /* suppress any "Please insert" popups */
if (LocaleBase = OpenLibrary("locale.library", 0)) {
if (ll = OpenLocale(NULL)) {
z = ll->loc_GMTOffset; /* in minutes */
if (z == -300) {
if (eh = Lock("ENV:sys/locale.prefs", ACCESS_READ)) {
view all matches for this distribution
view release on metacpan or search on metacpan
share/lexicons/app/bsky/actor/defs.json view on Meta::CPAN
"activeProgressGuide": {
"type": "ref",
"ref": "#bskyAppProgressGuide"
},
"queuedNudges": {
"description": "An array of tokens which identify nudges (modals, popups, tours, highlight dots) that should be shown to the user.",
"type": "array",
"maxLength": 1000,
"items": { "type": "string", "maxLength": 100 }
},
"nuxs": {
view all matches for this distribution
view release on metacpan or search on metacpan
DB/Util/Playlists.pm view on Meta::CPAN
Delete('playlist');
print startform(),
start_table(),
TR(td('Playlist Name'),td(textfield({-name=>'playlist'}))),
TR(td('Description'),td(textfield({-name=>'description'}))),
TR(td('Publically viewable?'),td(popup_menu({-name=>'is_shared',-values=>[qw/yes no/]}))),
TR(td({-colspan=>2,-align=>'right'},
submit(-name=>'submit',-label=>'Add New Playlist'))),
end_table;
# Fetch all the user playlists
print end_div;
DB/Util/Playlists.pm view on Meta::CPAN
# hidden(-name=>'playlist_id',-value=>$h->{playlist_id});
# print
# TR(td(textfield({-name=>'playlist',-value=>$h->{playlist},-size=>15})),
## td(textfield({-name=>'description',-value=>$h->{description},-size=>15})),
# td(textfield({-name=>'email',-value=>$h->{created},-size=>20})),
# td(popup_menu({-name=>'is_shared',-values=>[qw/yes no/]})));
#
# $sth->execute();
# while (my $h = $sth->fetchrow_hashref) {
#
# }
DB/Util/Playlists.pm view on Meta::CPAN
}
sub playlist_popup {
my $self = shift;
# Flow
# 1. Create the popup window
# 2. Fetch user playlists
# 3. Display form
# Processing...
# Should songs be added to new playlist?
# Creat playlist, then add songs.
# Should songs be added to existing playlist?
# Popupmen presents: view playlist or return...
# Example code for creating a javapopup window
# <script language="javascript" type="text/javascript">
# function OpenComments (c) {
# window.open('<$MTCGIPath$>mt-comments.cgi?' +
# 'entry_id=' + c,
# 'comments',
DB/Util/Playlists.pm view on Meta::CPAN
# Cases:
# 1. fetch playlists for a specific user,
# 2. Browse all playlists
# 3. fetch an individual playlist
# UI could present a popupmenu for each user
# Or alternatively, could expand them all
my $user_id = $self->{user_id};
my $dbh = $self->dbh;
# This is the flat query that simply returns all the playlists
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Audio/Nama/Completion.pm view on Meta::CPAN
If the word currently being edited has a unique match in the list of words,
then the word is completed entirely, followed by a space.
If there are multiple words that could complete from the word at the cursor,
then a popup menu is presented showing the next available characters or
matches. The user can continue typing more characters to narrow down the
choice until a unique match is found.
=cut
lib/Audio/Nama/Completion.pm view on Meta::CPAN
=item words => ARRAY
A shortcut to providing C<gen_words>; a reference to an array containing all
the possible words, in no particular order, that are offered for completion.
=item use_popup => BOOL
Optional. If false, do not display a popup menu. Defaults to true.
When this is disabled, the completion logic will apply longest-prefix matching
on the set of available words, but will not otherwise display or offer any
interactive UI on the list of matches.
lib/Audio/Nama/Completion.pm view on Meta::CPAN
# Need to disable style-applied keypress binding so this takes effect
$entry->set_style( '<Tab>' => "" );
}
field $_ignore_case :param //= 0;
field $_use_popup :param //= 1;
field $_append_after_word :param //= " ";
field $_gen_words :param = undef;
ADJUST :params (
lib/Audio/Nama/Completion.pm view on Meta::CPAN
croak "Require either 'gen_words' or 'words'";
}
field $_entry :param;
field $_popup_window;
method key_complete
{
my ( $partial ) = substr( $_entry->text, 0, $_entry->position ) =~ m/(\S*)$/;
my $plen = length $partial or return 1;
lib/Audio/Nama/Completion.pm view on Meta::CPAN
}
$_entry->text_splice( $_entry->position - $plen, $plen, $add );
return 1 if @completions < 2;
return 1 unless $_use_popup;
# Split matches on next letter
my %next;
foreach ( @completions ) {
my $l = substr( $_, $plen, 1 );
lib/Audio/Nama/Completion.pm view on Meta::CPAN
@{ $next{$_} } == 1 ? $next{$_}[0]
: substr( $next{$_}[0], 0, $plen + 1 ) . "..."
} sort keys %next;
# Popup above, unless there's no room at which point, go below
my $popup_line = ( $_entry->window->abs_top >= @possibles ) ? -(scalar @possibles) : +1;
my $popup = $_entry->make_popup_at_cursor(
$popup_line, -$plen,
scalar @possibles, max( map { textwidth($_) } @possibles ),
);
# TODO: Some style stuff here
$popup->pen->chattrs({ bg => 'green', fg => 'black' });
$popup->bind_event( expose => sub ( $win, $, $info, @ ) {
my $rb = $info->rb;
foreach my $line ( 0 .. $#possibles ) {
my $str = $possibles[$line];
lib/Audio/Nama/Completion.pm view on Meta::CPAN
$rb->text( substr( $str, 0, $plen + 1 ), PEN_UNDER );
$rb->text( substr( $str, $plen + 1 ) ) if length $str > $plen + 1;
$rb->erase_to( $win->cols );
}
} );
$popup->bind_event( key => sub ( $win, $, $info, @ ) {
my $redo_complete;
my $str = $info->str;
if( $info->type eq "text" ) {
lib/Audio/Nama/Completion.pm view on Meta::CPAN
elsif( $str eq "Escape" ) {
# OK, just dismiss
}
else {
# TODO: Handle at least Enter, maybe arrows to select?
print STDERR "TODO: Unsure how to handle key $str in popup menu\n";
}
$popup->hide;
undef $_popup_window;
$_entry->take_focus;
$self->key_complete if $redo_complete;
return 1;
} );
$popup->cursor_at( 0, $plen );
$popup->take_focus;
$popup->show;
$_popup_window = $popup;
return 1;
}
=head1 AUTHOR
view all matches for this distribution
view release on metacpan or search on metacpan
examples/js/jquery-1.9.1.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/Authen/Ticket/Server.pm view on Meta::CPAN
$q->Tr($q->td(['Duration', $q->textfield(-name => 'duration',
-default =>
($$self{TicketExpires} || 900) / 60,
-size => '4') .
' minutes'])),
$q->Tr($q->td(['Security', $q->popup_menu(
-name => 'security',
'-values' => [qw(strong med weak)],
-default => 'strong',
-labels => {qw(strong Strong med Medium weak Weak)},
) ] ) )
view all matches for this distribution
view release on metacpan or search on metacpan
lib/BBS/Perm/Plugin/Feed.pm view on Meta::CPAN
$entry->set_completion($entry_c);
my $store = Gtk2::ListStore->new('Glib::String');
$entry_c->set_model($store);
$entry_c->set_text_column(0);
$entry_c->set_popup_completion(TRUE);
$entry_c->set_inline_completion(TRUE);
$self->{entry} = $entry;
$self->{label} = $label;
$self->{_entry_c} = $entry_c;
$self->{_store} = $store;
view all matches for this distribution
view release on metacpan or search on metacpan
beamer-reveal-example.html view on Meta::CPAN
for (var i=0; i<bibliorefs.length; i++) {
const ref = bibliorefs[i];
const citeInfo = findCites(ref);
if (citeInfo) {
tippyHover(citeInfo.el, function() {
var popup = window.document.createElement('div');
citeInfo.cites.forEach(function(cite) {
var citeDiv = window.document.createElement('div');
citeDiv.classList.add('hanging-indent');
citeDiv.classList.add('csl-entry');
var biblioDiv = window.document.getElementById('ref-' + cite);
if (biblioDiv) {
citeDiv.innerHTML = biblioDiv.innerHTML;
}
popup.appendChild(citeDiv);
});
return popup.innerHTML;
});
}
}
});
</script>
view all matches for this distribution
view release on metacpan or search on metacpan
data/wiki0.html view on Meta::CPAN
<head>
<meta charset="UTF-8"/>
<title>Wikipedia, the free encyclopedia</title>
<script>document.documentElement.className="client-js";RLCONF={"wgBreakFrames":false,"wgSeparatorTransformTable":["",""],"wgDigitTransformTable":["",""],"wgDefaultDateFormat":"dmy","wgMonthNames":["","January","February","March","April","May","June",...
"tags":{"status":{"levels":-1}}},"wgMediaViewerOnClick":true,"wgMediaViewerEnabledByDefault":true,"wgPopupsFlags":10,"wgVisualEditor":{"pageLanguageCode":"en","pageLanguageDir":"ltr","pageVariantFallbacks":"en"},"wgMFDisplayWikibaseDescriptions":{"se...
"ext.visualEditor.desktopArticleTarget.noscript":"ready","ext.wikimediaBadges":"ready","ext.uls.interlanguage":"ready"};RLPAGEMODULES=["mediawiki.page.gallery","site","mediawiki.page.ready","skins.vector.legacy.js","ext.gadget.ReferenceTooltips","ext...
<script>(RLQ=window.RLQ||[]).push(function(){mw.loader.implement("user.options@1hzgi",function($,jQuery,require,module){/*@nomin*/mw.user.tokens.set({"patrolToken":"+\\","watchToken":"+\\","csrfToken":"+\\"});
});});</script>
<link rel="stylesheet" href="/w/load.php?lang=en&modules=ext.uls.interlanguage%7Cext.visualEditor.desktopArticleTarget.noscript%7Cext.wikimediaBadges%7Cmediawiki.page.gallery.styles%7Cskins.vector.styles.legacy&only=styles&skin=vector"/>
<script async="" src="/w/load.php?lang=en&modules=startup&only=scripts&raw=1&skin=vector"></script>
<meta name="ResourceLoaderDynamicStyles" content=""/>
data/wiki0.html view on Meta::CPAN
<nav id="p-variants" class="mw-portlet mw-portlet-variants emptyPortlet vector-menu-dropdown-noicon vector-menu vector-menu-dropdown" aria-labelledby="p-variants-label" role="navigation"
>
<input type="checkbox"
id="p-variants-checkbox"
role="button"
aria-haspopup="true"
data-event-name="ui.dropdown-p-variants"
class="vector-menu-checkbox" aria-labelledby="p-variants-label" />
<h3 id="p-variants-label" aria-label="Change language variant" class="vector-menu-heading">
<span>Variants</span>
data/wiki0.html view on Meta::CPAN
<nav id="p-cactions" class="mw-portlet mw-portlet-cactions emptyPortlet vector-menu-dropdown-noicon vector-menu vector-menu-dropdown" aria-labelledby="p-cactions-label" role="navigation" title="More options"
>
<input type="checkbox"
id="p-cactions-checkbox"
role="button"
aria-haspopup="true"
data-event-name="ui.dropdown-p-cactions"
class="vector-menu-checkbox" aria-labelledby="p-cactions-label" />
<h3 id="p-cactions-label" aria-label="" class="vector-menu-heading">
<span>More</span>
view all matches for this distribution
view release on metacpan or search on metacpan
share/SpamAssassin/easy_ham/00001.7c53336b37003a9286aba55d2945844c view on Meta::CPAN
delta$ mhparam pick
-seq sel -list
Since the pick command works, the sequence (actually, both of them, the
one that's explicit on the command line, from the search popup, and the
one that comes from .mh_profile) do get created.
kre
ps: this is still using the version of the code form a day ago, I haven't
view all matches for this distribution
view release on metacpan or search on metacpan
examples/post.js view on Meta::CPAN
var jsonString = JSON.stringify(Obj);
document.getElementById('out').innerHTML = document.getElementById('out').innerHTML+jsonString;
}
//--------------------------------------
// Code below creates popup for structured input of author details
//--------------------------------------
function initAuth() {
// attach popups to every author list cell
SetAuthEvents('doi');
SetAuthEvents('nodoi');
}
function SetAuthEvents(dataTable) {
// attach popups to every author list cell
var table = document.getElementById(dataTable);
if (table == null) return;
var rows = table.rows;
for (var i = 1; i<rows.length; i++) {
if (rows[i].id == "cite") {
examples/post.js view on Meta::CPAN
var str = '';
for (var i = 0; i<bits.length; i++) {
str += bits[i]+"\n";
}
// create popup
var m = document.createElement("div");
m.id = "auth";
m.style.cssText="position:absolute; background:#0E73B9; padding:10px; box-shadow:10px 10px 5px #888888; border:1px solid;";
// textarea with authors, one per line
m.innerHTML = '<textarea rows="'+(bits.length+2)+'">'+str+'</textarea><br>';
examples/post.js view on Meta::CPAN
// extract author list info
var auths = m.firstChild.value;
auths = auths.replace(/\n+/g,' and ');
auths = auths.replace(/^ and /,'');
auths = auths.replace(/ and $/,'');
// delete popup
td.removeChild(td.firstChild);
// update table entry
td.textContent=auths;
} else {
// just delete popup
td.removeChild(td.firstChild);
}
}
function HandleAuth(e) {
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Bigtop/Keywords.pm view on Meta::CPAN
sort_order => 147,
},
date_select_text => {
keyword => 'date_select_text',
label => 'Date Popup Link Text',
descr => 'link text for date popup window',
type => 'text',
field_type => 'text',
multiple => 0,
refresh => 1,
sort_order => 150,
view all matches for this distribution
view release on metacpan or search on metacpan
lib/BingoX/Chromium.pm view on Meta::CPAN
$SV = $object->HTML_date( $fieldname );
$SV = $object->HTML_view( $fieldname );
$SV = $object->HTML_hidden( $fieldname );
$SV = $object->HTML_text( $fieldname );
$SV = $object->HTML_textarea( $fieldname );
$SV = $object->HTML_popup( $fieldname ); - Not Finished!
$SV = $object->HTML_scrolling( $fieldname );
$SV = $object->HTML_checkbox( $fieldname );
$SV = $object->HTML_file( $fieldname );
=head1 REQUIRES
lib/BingoX/Chromium.pm view on Meta::CPAN
view
text
textarea
datetime
popup
reference
FIXME: more!!!
=item [2] HTML Options
lib/BingoX/Chromium.pm view on Meta::CPAN
-MAXLENGTH => $qoptions->{'-MIN_MAXLENGTH'} || 2,
-OVERRIDE => $qoptions->{'-MIN_OVERRIDE'} || 1,
-DEFAULT => sprintf("%02d", $q->param( $qfieldname.'_min' ) || $minute)
)
. ($hr24 ? '' :
' ' . $q->popup_menu( -NAME => $qfieldname.'_ampm',
-VALUES => [ 'AM', 'PM' ],
-DEFAULT => ($q->param( $qfieldname.'_ampm' ) || $ampm),
-OVERRIDE => $qoptions->{'-AMPM_OVERRIDE'} || 1
));
} else {
return $q->popup_menu( -NAME => $qfieldname.'_hour',
-VALUES => ($hr24 ? $date_obj->hours24 : $date_obj->hours),
-DEFAULT => sprintf("%02d", $hour),
-OVERRIDE => $qoptions->{'-HR_OVERRIDE'} || 1
)
. ' : '
. $q->popup_menu( -NAME => $qfieldname.'_min',
-VALUES => $date_obj->minutes,
-DEFAULT => sprintf("%02d", $q->param( $qfieldname.'_min' ) || $minute),
-OVERRIDE => $qoptions->{'-MIN_OVERRIDE'} || 1
)
. ($hr24 ? '' :
' ' . $q->popup_menu( -NAME => $qfieldname.'_ampm',
-VALUES => [ 'AM', 'PM' ],
-DEFAULT => ($q->param( $qfieldname.'_ampm' ) || $ampm),
-OVERRIDE => $qoptions->{'-AMPM_OVERRIDE'} || 1
));
}
lib/BingoX/Chromium.pm view on Meta::CPAN
-MAXLENGTH => $qoptions->{'-DAY_MAXLENGTH'} || 2,
-OVERRIDE => $qoptions->{'-DAY_OVERRIDE'} || 1,
-DEFAULT => $q->param( $qfieldname.'_day' ) || $date_obj->mday
);
} else {
return $q->popup_menu( -NAME => $qfieldname.'_day',
-VALUES => [ 1 .. 31 ],
-OVERRIDE => $qoptions->{'-DAY_OVERRIDE'} || 1,
-DEFAULT => $q->param( $qfieldname.'_day' ) || $date_obj->mday
);
}
lib/BingoX/Chromium.pm view on Meta::CPAN
-MAXLENGTH => $qoptions->{'-MON_MAXLENGTH'} || 2,
-OVERRIDE => $qoptions->{'-MON_OVERRIDE'} || 1,
-DEFAULT => $q->param( $qfieldname.'_mon' ) || $date_obj->mon
);
} else {
return $q->popup_menu( -NAME => $qfieldname . '_mon',
-VALUES => [ 1 .. 12 ],
-LABELS => ($format =~ /\%B/o ? $date_obj->months_full : $date_obj->months),
-OVERRIDE => $qoptions->{'-MON_OVERRIDE'} || 1,
-DEFAULT => $q->param( $qfieldname.'_mon' ) || $date_obj->mon
);
lib/BingoX/Chromium.pm view on Meta::CPAN
-MAXLENGTH => $max,
-OVERRIDE => $qoptions->{'-YEAR_OVERRIDE'} || 1,
-DEFAULT => $q->param( $qfieldname.'_year' ) || $year
);
} else {
return $q->popup_menu( -NAME => $qfieldname.'_year',
-VALUES => $values,
-OVERRIDE => $qoptions->{'-YEAR_OVERRIDE'} || 1,
-DEFAULT => $q->param( $qfieldname.'_year' ) || $year
);
}
lib/BingoX/Chromium.pm view on Meta::CPAN
: ($qoptions->{'-DEFAULT'} || '')))
) . "\n";
} # END sub HTML_textarea
=item C<HTML_popup> ( $fieldname [, $qoptions ] )
Object Method:
Generic form field method called by AUTOLOAD.
Gets the default field params based on the fieldname and returns the value
in a popup field or in viewable format if the displaymode is 'view'.
Note: Not used yet because its not easy to populate the
vaules & labels fields. USually always overloaded in the subclasses.
B<OPTIMIZE>
=cut
sub HTML_popup {
my $self = shift;
my $class = ref($self) || return undef;
my $fieldname = shift;
my $qoptions = shift || $self->fieldhtmloptions( $fieldname );
my $foptions = $self->fieldoptions( $fieldname );
lib/BingoX/Chromium.pm view on Meta::CPAN
## get all of the objects with get_list_hash. ##
} else {
my $hashref = $relclass->get_list_hash( $self->dbh );
## Allows null value for popups ##
if (!$foptions->{'not_null'} && $foptions->{'null_label'}) {
$hashref->{'NULL'} = $foptions->{'null_label'};
}
# ## if the displaymode isn't add, then highlite the already related objects. ##
lib/BingoX/Chromium.pm view on Meta::CPAN
## default - if there's already data in the query object, highlite those objects, ##
## otherwise if the displaymode if modify, show the data in the scrolling list where the ##
## keys are composit primary keys seperated by $self->pkd and the ##
## values are the title_fields of the objects, else don't highlite anything. ##
$q->popup_menu( -NAME => $qfieldname,
-VALUES => [ sort { $hashref->{$a} cmp $hashref->{$b} } keys %$hashref ], # need to fill in info later
-LABELS => $hashref, # need to fill in info later
-DEFAULT => (defined($q->param( $qfieldname ))
? $q->param( $qfieldname )
: (($self->displaymode eq 'modify')
lib/BingoX/Chromium.pm view on Meta::CPAN
: ((($self->displaymode eq 'add') && ($reladminclass eq $self->parent_class) && ($q->param('parent_pcpkey')))
? (substr($q->param('parent_pcpkey'),rindex($q->param('parent_pcpkey'),$self->qfd)+1))
: ($qoptions->{'-DEFAULT'} || ''))))
) . "\n";
}
} # END sub HTML_popup
=item C<HTML_radio> ( $fieldname [, $qoptions ] )
Object Method:
lib/BingoX/Chromium.pm view on Meta::CPAN
- cpkey
- cpkey now just calls cpkey against the db_obj
- cpkey_params
- calls cpkey_params against your data_class
- added children and parents class var accessor methods
- HTML_popup
- if your displaymode is add and you have a parent_pcpkey it attempts to
select the parent in the pop-up menu.
Revision 2.15 2000/09/07 22:49:03 thai
- changed line 1200 to use BingoX::Time
lib/BingoX/Chromium.pm view on Meta::CPAN
Revision 1.36 2000/03/15 22:26:17 zack
Added HTML_radio() and modified new() to allow passing a display mode.
Revision 1.35 2000/03/15 19:25:43 colin
-HTML_popup now sorts options alphabetically
Revision 1.34 2000/03/14 21:45:08 dougw
Fixed get_data->save_data problems (thanks dave).
Removed spurious comments.
Revision 1.33 2000/03/14 20:58:10 dougw
Modified HTML_popup to allow a NULL selection. Use the fieldoption -null_label
to specify what you want the option to be named. The option must not have the
-not_null option set for obvious reasons.
Revision 1.32 2000/03/10 01:57:54 colin
made display_list()'s hash sorter even cooler (thanks doug)
lib/BingoX/Chromium.pm view on Meta::CPAN
=item * HTML_radio
=item * HTML_file - needs work
=item * HTML_popup - should support getting a hashref or a coderef as the LABELS or VALUES
=item * HTML_date - Only supports PST (hardcoded text)
=item * HTML_date - should it be some DateTime dependant? Is there a way to make it more universal?
lib/BingoX/Chromium.pm view on Meta::CPAN
=item * HTML_scrolling (or any method that relates) - Can link to that methods view page for that object.
=item * HTML methods should use options hash from fields hash.
=item * HTML_popup - doesn't totally work because I don't know how one 2 many carbon relationships
work. I am also not sure if I want to structure the class data the way I did. It also
doesn't support composite primary keys (how would it?)
=item * need HTML_popupwindow method which lets users select related items from a js pop-up window.
(See Derek's Code or CyberStore Code)
=item * have AUTLOAD create dynamic methods
=item * dbh() - doesn't use Carboniums dbh. Doesn't cache dbh object. Should just
view all matches for this distribution