view release on metacpan or search on metacpan
Elementary/Elementary.xs view on Meta::CPAN
elm_menu_move(Evas_Object *obj, Evas_Coord x, Evas_Coord y)
void
elm_menu_parent_set(Evas_Object *obj, Evas_Object *parent)
Elm_Menu_Item *
elm_menu_item_add(obj, parent, icon, label, func, data)
Evas_Object *obj
Elm_Menu_Item *parent
Evas_Object *icon
const char *label
SV *func
SV *data
PREINIT:
Elementary/Elementary.xs view on Meta::CPAN
RETVAL = elm_menu_item_add(obj, parent, icon, label, call_perl_sub, sc);
OUTPUT:
RETVAL
Elm_Menu_Item *
elm_menu_item_separator_add(Evas_Object *obj, Elm_Menu_Item *parent)
void
elm_menu_item_label_set(Elm_Menu_Item *item, const char *label)
const char *
elm_menu_item_label_get(Elm_Menu_Item *item)
void
elm_menu_item_icon_set(Elm_Menu_Item *item, Evas_Object *icon)
void
elm_menu_item_disabled_set(Elm_Menu_Item *item, Eina_Bool disabled)
void
elm_menu_item_del(Elm_Menu_Item *item)
Evas_Object *
elm_menu_object_get(const Elm_Menu_Item *it)
const Eina_List *
elm_menu_item_subitems_get(Elm_Menu_Item *item)
# list
# ------------------------------------------------------------------------------
Evas_Object *
view all matches for this distribution
view release on metacpan or search on metacpan
lib/EV/Telegram/TDLib/Bots.pm view on Meta::CPAN
sub attachment_menu_bot {
my ($self, @args) = @_;
my $cb = ref $args[-1] eq 'CODE' ? pop @args : sub {};
my ($bot, @rest) = @args;
_need('bot_user_id', $bot);
$self->send({ '@type' => 'getAttachmentMenuBot', bot_user_id => 0 + $bot }, $cb);
return;
}
# openWebApp with an empty url needs the bot to be in the attachment menu
sub toggle_attachment_menu {
my ($self, @args) = @_;
my $cb = ref $args[-1] eq 'CODE' ? pop @args : sub {};
my ($bot, $on, @rest) = @args;
my %opt = @rest;
_need('bot_user_id', $bot);
$self->send({ '@type' => 'toggleBotIsAddedToAttachmentMenu',
bot_user_id => 0 + $bot,
is_added => _json_bool(defined $on ? $on : 1),
allow_write_access => _json_bool($opt{allow_write_access}) }, $cb);
return;
}
lib/EV/Telegram/TDLib/Bots.pm view on Meta::CPAN
my ($self, @args) = @_;
my $cb = ref $args[-1] eq 'CODE' ? pop @args : sub {};
my ($user_id, @rest) = @args;
my %opt = @rest;
$self->send({
'@type' => 'setMenuButton',
user_id => 0 + ($user_id // 0),
menu_button => { '@type' => 'botMenuButton',
text => $opt{text} // '',
url => $opt{url} // '' },
}, $cb);
return;
}
sub menu_button {
my ($self, @args) = @_;
my $cb = ref $args[-1] eq 'CODE' ? pop @args : sub {};
my ($user_id, @rest) = @args;
$self->send({ '@type' => 'getMenuButton', user_id => 0 + ($user_id // 0) }, $cb);
return;
}
1;
view all matches for this distribution
view release on metacpan or search on metacpan
lib/EV/WebKit/Element.pm view on Meta::CPAN
$el->hover($cb);
Dispatches the pointer/mouse sequence an entering cursor produces:
C<pointerover>/C<mouseover> (which bubble), then C<pointerenter>/C<mouseenter>
(which do not), then C<mousemove>, positioned at the element's centre. Menus
and tooltips listen for various of these, so dispatching only C<mouseover>
leaves a menu that opens on C<mouseenter> shut. These are synthetic events:
C<isTrusted> is false, so a page that checks it is not fooled.
=head2 box
view all matches for this distribution
view release on metacpan or search on metacpan
www/edgeexpress/jscript/SpryAssets/SpryMenuBar.js view on Meta::CPAN
/* SpryMenuBar.js - Revision: Spry Preview Release 1.4 */
// Copyright (c) 2006. Adobe Systems Incorporated.
// All rights reserved.
//
// Redistribution and use in source and binary forms, with or without
www/edgeexpress/jscript/SpryAssets/SpryMenuBar.js view on Meta::CPAN
// ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
// POSSIBILITY OF SUCH DAMAGE.
/*******************************************************************************
SpryMenuBar.js
This file handles the JavaScript for Spry Menu Bar. You should have no need
to edit this file. Some highlights of the MenuBar object is that timers are
used to keep submenus from showing up until the user has hovered over the parent
menu item for some time, as well as a timer for when they leave a submenu to keep
showing that submenu until the timer fires.
*******************************************************************************/
www/edgeexpress/jscript/SpryAssets/SpryMenuBar.js view on Meta::CPAN
if(!Spry.Widget)
{
Spry.Widget = {};
}
// Constructor for Menu Bar
// element should be an ID of an unordered list (<ul> tag)
// preloadImage1 and preloadImage2 are images for the rollover state of a menu
Spry.Widget.MenuBar = function(element, opts)
{
this.init(element, opts);
};
Spry.Widget.MenuBar.prototype.init = function(element, opts)
{
this.element = this.getElement(element);
// represents the current (sub)menu we are operating on
this.currMenu = null;
var isie = (typeof document.all != 'undefined' && typeof window.opera == 'undefined' && navigator.vendor != 'KDE');
if(typeof document.getElementById == 'undefined' || (navigator.vendor == 'Apple Computer, Inc.' && typeof window.XMLHttpRequest == 'undefined') || (isie && typeof document.uniqueID == 'undefined'))
{
// bail on older unsupported browsers
www/edgeexpress/jscript/SpryAssets/SpryMenuBar.js view on Meta::CPAN
}
}
if(this.element)
{
this.currMenu = this.element;
var items = this.element.getElementsByTagName('li');
for(var i=0; i<items.length; i++)
{
this.initialize(items[i], element, isie);
if(isie)
{
this.addClassName(items[i], "MenuBarItemIE");
items[i].style.position = "static";
}
}
if(isie)
{
if(this.hasClassName(this.element, "MenuBarVertical"))
{
this.element.style.position = "relative";
}
var linkitems = this.element.getElementsByTagName('a');
for(var i=0; i<linkitems.length; i++)
www/edgeexpress/jscript/SpryAssets/SpryMenuBar.js view on Meta::CPAN
}
}
}
};
Spry.Widget.MenuBar.prototype.getElement = function(ele)
{
if (ele && typeof ele == "string")
return document.getElementById(ele);
return ele;
};
Spry.Widget.MenuBar.prototype.hasClassName = function(ele, className)
{
if (!ele || !className || !ele.className || ele.className.search(new RegExp("\\b" + className + "\\b")) == -1)
{
return false;
}
return true;
};
Spry.Widget.MenuBar.prototype.addClassName = function(ele, className)
{
if (!ele || !className || this.hasClassName(ele, className))
return;
ele.className += (ele.className ? " " : "") + className;
};
Spry.Widget.MenuBar.prototype.removeClassName = function(ele, className)
{
if (!ele || !className || !this.hasClassName(ele, className))
return;
ele.className = ele.className.replace(new RegExp("\\s*\\b" + className + "\\b", "g"), "");
};
// addEventListener for Menu Bar
// attach an event to a tag without creating obtrusive HTML code
Spry.Widget.MenuBar.prototype.addEventListener = function(element, eventType, handler, capture)
{
try
{
if (element.addEventListener)
{
www/edgeexpress/jscript/SpryAssets/SpryMenuBar.js view on Meta::CPAN
}
}
catch (e) {}
};
// createIframeLayer for Menu Bar
// creates an IFRAME underneath a menu so that it will show above form controls and ActiveX
Spry.Widget.MenuBar.prototype.createIframeLayer = function(menu)
{
var layer = document.createElement('iframe');
layer.tabIndex = '-1';
layer.src = 'javascript:false;';
menu.parentNode.appendChild(layer);
www/edgeexpress/jscript/SpryAssets/SpryMenuBar.js view on Meta::CPAN
layer.style.top = menu.offsetTop + 'px';
layer.style.width = menu.offsetWidth + 'px';
layer.style.height = menu.offsetHeight + 'px';
};
// removeIframeLayer for Menu Bar
// removes an IFRAME underneath a menu to reveal any form controls and ActiveX
Spry.Widget.MenuBar.prototype.removeIframeLayer = function(menu)
{
var layers = menu.parentNode.getElementsByTagName('iframe');
while(layers.length > 0)
{
layers[0].parentNode.removeChild(layers[0]);
}
};
// clearMenus for Menu Bar
// root is the top level unordered list (<ul> tag)
Spry.Widget.MenuBar.prototype.clearMenus = function(root)
{
var menus = root.getElementsByTagName('ul');
for(var i=0; i<menus.length; i++)
{
this.hideSubmenu(menus[i]);
}
this.removeClassName(this.element, "MenuBarActive");
};
// bubbledTextEvent for Menu Bar
// identify bubbled up text events in Safari so we can ignore them
Spry.Widget.MenuBar.prototype.bubbledTextEvent = function()
{
return (navigator.vendor == 'Apple Computer, Inc.' && (event.target == event.relatedTarget.parentNode || (event.eventPhase == 3 && event.target.parentNode == event.relatedTarget)));
};
// showSubmenu for Menu Bar
// set the proper CSS class on this menu to show it
Spry.Widget.MenuBar.prototype.showSubmenu = function(menu)
{
if(this.currMenu)
{
this.clearMenus(this.currMenu);
this.currMenu = null;
}
if(menu)
{
this.addClassName(menu, "MenuBarSubmenuVisible");
if(typeof document.all != 'undefined' && typeof window.opera == 'undefined' && navigator.vendor != 'KDE')
{
if(!this.hasClassName(this.element, "MenuBarHorizontal") || menu.parentNode.parentNode != this.element)
{
menu.style.top = menu.parentNode.offsetTop + 'px';
}
}
if(typeof document.uniqueID != "undefined")
{
this.createIframeLayer(menu);
}
}
this.addClassName(this.element, "MenuBarActive");
};
// hideSubmenu for Menu Bar
// remove the proper CSS class on this menu to hide it
Spry.Widget.MenuBar.prototype.hideSubmenu = function(menu)
{
if(menu)
{
this.removeClassName(menu, "MenuBarSubmenuVisible");
if(typeof document.all != 'undefined' && typeof window.opera == 'undefined' && navigator.vendor != 'KDE')
{
menu.style.top = '';
menu.style.left = '';
}
this.removeIframeLayer(menu);
}
};
// initialize for Menu Bar
// create event listeners for the Menu Bar widget so we can properly
// show and hide submenus
Spry.Widget.MenuBar.prototype.initialize = function(listitem, element, isie)
{
var opentime, closetime;
var link = listitem.getElementsByTagName('a')[0];
var submenus = listitem.getElementsByTagName('ul');
var menu = (submenus.length > 0 ? submenus[0] : null);
var hasSubMenu = false;
if(menu)
{
this.addClassName(link, "MenuBarItemSubmenu");
hasSubMenu = true;
}
if(!isie)
{
// define a simple function that comes standard in IE to determine
www/edgeexpress/jscript/SpryAssets/SpryMenuBar.js view on Meta::CPAN
{
// ignore bubbled text events
return;
}
clearTimeout(closetime);
if(self.currMenu == listitem)
{
self.currMenu = null;
}
// show menu highlighting
self.addClassName(link, hasSubMenu ? "MenuBarItemSubmenuHover" : "MenuBarItemHover");
if(menu && !self.hasClassName(menu, "MenuBarSubmenuVisible"))
{
opentime = window.setTimeout(function(){self.showSubmenu(menu);}, 250);
}
}, false);
www/edgeexpress/jscript/SpryAssets/SpryMenuBar.js view on Meta::CPAN
var related = (typeof e.relatedTarget != 'undefined' ? e.relatedTarget : e.toElement);
if(!listitem.contains(related))
{
clearTimeout(opentime);
self.currMenu = listitem;
// remove menu highlighting
self.removeClassName(link, hasSubMenu ? "MenuBarItemSubmenuHover" : "MenuBarItemHover");
if(menu)
{
closetime = window.setTimeout(function(){self.hideSubmenu(menu);}, 600);
}
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/EB/Wx/Shell/MainFrame.pm view on Meta::CPAN
my $i = -1;
for ( MENU_REP_BAL_ACT, MENU_REP_BAL_MGP,
MENU_REP_BAL_GRP, MENU_REP_BAL_GAC,) {
my $sub = $i++;
Wx::Event::EVT_MENU($self, $_, sub { push(@_, $sub); &OnMenuBal });
}
$i = -1;
for ( MENU_REP_RES_ACT, MENU_REP_RES_MGP,
MENU_REP_RES_GRP, MENU_REP_RES_GAC,) {
my $sub = $i++;
Wx::Event::EVT_MENU($self, $_, sub { push(@_, $sub); &OnMenuRes });
}
Wx::Event::EVT_MENU($self, MENU_REP_JNL, \&OnJournal);
Wx::Event::EVT_MENU($self, MENU_REP_UN, \&OnMenuUns);
Wx::Event::EVT_MENU($self, MENU_REP_AP, \&OnMenuAP);
Wx::Event::EVT_MENU($self, MENU_REP_AR, \&OnMenuAR);
Wx::Event::EVT_MENU($self, MENU_REP_VAT, \&OnMenuVAT);
Wx::Event::EVT_MENU($self, wxID_HELP, \&OnHelp);
Wx::Event::EVT_MENU($self, MENU_HELP_SUPPORT, \&OnSupport);
Wx::Event::EVT_MENU($self, wxID_ABOUT, \&OnAbout);
#### End of MenuBar
Wx::Event::EVT_CLOSE($self, \&OnQuit);
Wx::Event::EVT_CHAR($self->{t_input}, sub { $self->OnChar(@_) });
# Wx::Event::EVT_IDLE($self, \&OnIdle);
lib/EB/Wx/Shell/MainFrame.pm view on Meta::CPAN
sub __set_menubar {
my $self = shift;
# Unfortunately, due to an error in wxGlade sub-menu
# generation we need to do it ourselves. All...
$self->{menubar} = Wx::MenuBar->new();
my $wxglade_tmp_menu;
$wxglade_tmp_menu = Wx::Menu->new();
$wxglade_tmp_menu->Append(wxID_OPEN, _T("&Open\tCtrl-O"), "");
$wxglade_tmp_menu->AppendSeparator();
$wxglade_tmp_menu->Append(wxID_PREFERENCES, _T("Voorkeuren..."), "");
$wxglade_tmp_menu->AppendSeparator();
$wxglade_tmp_menu->Append(wxID_EXIT, _T("Afsluiten\tCtrl-Q"), "");
$self->{menubar}->Append($wxglade_tmp_menu, _T("&Bestand"));
$wxglade_tmp_menu = Wx::Menu->new();
$wxglade_tmp_menu->Append(MENU_INPUTEDIT, _T("&Edit invoerregel\tCtrl+Enter"), "");
$wxglade_tmp_menu->Append(MENU_INPUTEXEC, _T("&Uitvoeren invoerregel\tEnter"), "");
$wxglade_tmp_menu->AppendSeparator();
$wxglade_tmp_menu->Append(wxID_CLEAR, _T("Uitvoer schoonmaken"), "");
$self->{menubar}->Append($wxglade_tmp_menu, _T("B&ewerken"));
$self->{Reports} = Wx::Menu->new();
$self->{Reports}->Append(MENU_REP_TRIAL, _T("Proef- en Saldibalans"), "");
$self->{Reports_bal} = Wx::Menu->new();
$self->{Reports_bal}->Append(MENU_REP_BAL_ACT, _T("Op grootboekrekening"), "");
$self->{Reports_bal}->AppendSeparator();
$self->{Reports_bal}->Append(MENU_REP_BAL_MGP, _T("Op hoofdverdichting"), "");
$self->{Reports_bal}->Append(MENU_REP_BAL_GRP, _T("Op verdichting"), "");
$self->{Reports_bal}->Append(MENU_REP_BAL_GAC, _T("Gedetailleerd"), "");
$self->{Reports}->Append(Wx::NewId(), _T("Balans"), $self->{Reports_bal}, "");
$self->{Reports_res} = Wx::Menu->new();
$self->{Reports_res}->Append(MENU_REP_RES_ACT, _T("Op grootboekrekening"), "");
$self->{Reports_res}->AppendSeparator();
$self->{Reports_res}->Append(MENU_REP_RES_MGP, _T("Op hoofdverdichting"), "");
$self->{Reports_res}->Append(MENU_REP_RES_GRP, _T("Op verdichting"), "");
$self->{Reports_res}->Append(MENU_REP_RES_GAC, _T("Gedetailleerd"), "");
lib/EB/Wx/Shell/MainFrame.pm view on Meta::CPAN
$self->{Reports}->Append(MENU_REP_AP, _T("Crediteuren"), "");
$self->{Reports}->Append(MENU_REP_AR, _T("Debiteuren"), "");
$self->{Reports}->AppendSeparator();
$self->{Reports}->Append(MENU_REP_VAT, _T("BTW Aangifte"), "");
$self->{menubar}->Append($self->{Reports}, _T("&Rapporten"));
$wxglade_tmp_menu = Wx::Menu->new();
$wxglade_tmp_menu->Append(wxID_HELP, _T("&Hulp..."), "");
$wxglade_tmp_menu->AppendSeparator();
$wxglade_tmp_menu->Append(MENU_HELP_SUPPORT, _T("Ondersteuning..."), "");
$wxglade_tmp_menu->AppendSeparator();
$wxglade_tmp_menu->Append(wxID_ABOUT, _T("Over..."), "");
$self->{menubar}->Append($wxglade_tmp_menu, _T("&Hulp"));
$self->SetMenuBar($self->{menubar});
}
sub __set_properties {
my $self = shift;
lib/EB/Wx/Shell/MainFrame.pm view on Meta::CPAN
for ( keys( %$prefctl ) ) {
$conf->WriteInt( "preferences/$_", $self->{"prefs_$_"} );
}
}
sub OnMenuBal {
my ($self, $event, $sub) = @_;
# wxGlade: EB::Wx::Shell::MainFrame::OnMenuBal <event_handler>
if ( defined $sub && $sub >= 0 ) {
$self->_cmd("balans --verdicht --detail=$sub --gen-wxhtml\n");
}
else {
lib/EB/Wx/Shell/MainFrame.pm view on Meta::CPAN
}
# end wxGlade
}
sub OnMenuRes {
my ($self, $event, $sub) = @_;
# wxGlade: EB::Wx::Shell::MainFrame::OnMenuRes <event_handler>
if ( defined $sub && $sub >= 0 ) {
$self->_cmd("result --verdicht --detail=$sub --gen-wxhtml\n");
}
else {
lib/EB/Wx/Shell/MainFrame.pm view on Meta::CPAN
}
# end wxGlade
}
sub OnMenuAP {
my ($self, $event) = @_;
# wxGlade: EB::Wx::Shell::MainFrame::OnMenuAP <event_handler>
$self->_cmd("crediteuren --gen-wxhtml\n");
# end wxGlade
}
sub OnMenuAR {
my ($self, $event) = @_;
# wxGlade: EB::Wx::Shell::MainFrame::OnMenuAR <event_handler>
$self->_cmd("debiteuren --gen-wxhtml\n");
# end wxGlade
}
sub OnMenuVAT {
my ($self, $event) = @_;
# wxGlade: EB::Wx::Shell::MainFrame::OnMenuAR <event_handler>
$self->_cmd("btwaangifte --gen-wxhtml\n");
# end wxGlade
}
sub OnMenuUns {
my ($self, $event) = @_;
# wxGlade: EB::Wx::Shell::MainFrame::OnMenuUns <event_handler>
$self->_cmd("openstaand --gen-wxhtml\n");
# end wxGlade
}
view all matches for this distribution
view release on metacpan or search on metacpan
doc/epl.info view on Meta::CPAN
EPL version 0.7.
EPL (Emacs Perl) is a library of Lisp functions and Perl modules that
let you write Emacs extensions in Perl.
* Menu:
* Preface:: Why I'm here.
* Introduction:: Beginning with an example.
* Features:: How Perl looks to Lisp, how Lisp looks to Perl.
* Configuration:: Changing the defaults.
doc/epl.info view on Meta::CPAN
This document assumes knowledge of Emacs terms such as "the
minibuffer" and "`M-x'" (*note Running Commands by Name: (emacs)Top.).
It assumes knowledge of Perl references and nested data structures
(perlref(1)), and packages and modules (perlmod(1)).
* Menu:
* Perl Example:: An example: Find files containing regex.
* History:: EPL uses IPC, not translation or embedding.
* Emacs Lisp:: You need the Emacs Lisp Reference Manual.
* Coding Conventions:: Why the Perl examples use `&FUNCTION()'.
doc/epl.info view on Meta::CPAN
and Emacs Lisp's. Perl and Lisp are quite different, so some features
favored by one language are imperfectly or awkwardly reproduced in the
other. EPL follows Perl's philosophy of making simple things easy and
hard things possible.
* Menu:
* Data Conversion:: Working with each other's data types.
* Functions:: Calling each other's functions, `defun'.
* Control Structures:: Exceptions; `throw', `signal', `die'.
* Input/Output:: Perl's primitives are redefined in Emacs.
doc/epl.info view on Meta::CPAN
This section describes the conversions that apply to each language's
scalar and container types. For a complete description of Lisp types,
see *Note Lisp Data Types: (elisp)Lisp Data Types.
* Menu:
* Scalars:: Lisp has three scalar types.
* The Null Value:: `undef' and `()' are `nil'.
* Symbols and Globrefs:: `\*::sym' is `'sym'.
* Lists and Arrayrefs:: `["fnord"]' is `'("fnord")'.
doc/epl.info view on Meta::CPAN
File: epl.info, Node: Functions, Next: Control Structures, Prev: Data Conversion, Up: Features
Functions
=========
* Menu:
* Evaluation:: `perl-eval'.
* Ordinary Functions:: `perl-call', `use Emacs::Lisp;'.
* Pass-by-Reference:: How to inhibit data conversion.
* Commands:: Extending Emacs without Lisp, `defun'.
doc/epl.info view on Meta::CPAN
File: epl.info, Node: Caveats, Prev: Input/Output, Up: Features
Caveats
=======
* Menu:
* References Incur Overhead:: Memory management hurdles.
* Conversion Is Imperfect:: Natural mappings are not always 1-to-1.
doc/epl.info view on Meta::CPAN
File: epl.info, Node: Configuration, Next: Internals, Prev: Features, Up: Top
Configuration
*************
* Menu:
* Installation:: Lisp files, Perl modules, documentation.
* The Easy Way:: We like the defaults.
* Starting a Perl Process in Emacs:: `make-perl-interpreter'.
* Starting an Emacs Process in Perl:: `use Emacs::Lisp;'.
doc/epl.info view on Meta::CPAN
The chapter ends with a more concrete description of EPL's protocol.
This information changes with great frequency and may be completely
outdated by the time you read this.
* Menu:
* Debugging Options:: Dumping traffic to stderr or a buffer.
* Transport Layer:: Media of interprocess communication.
* Message Types:: What interpreters can say to each other.
* State Transitions:: The message stream grammar.
doc/epl.info view on Meta::CPAN
You may distribute copies of this documentation in accordance with
the *Note GNU Free Documentation License::, Version 1.1 or any later
version published by the Free Software Foundation; with no required
Invariant Sections, Front-Cover texts, or Back-Cover Texts.
* Menu:
* GNU Free Documentation License:: The GNU FDL.
File: epl.info, Node: GNU Free Documentation License, Up: Copying Conditions
doc/epl.info view on Meta::CPAN
File: epl.info, Node: Index, Prev: Copying Conditions, Up: Top
Index
*****
* Menu:
* $Emacs::EPL::debugging: Debugging Options.
* connection types: Transport Layer.
* debugging EPL: Debugging Options.
* dumping message traffic: Debugging Options.
view all matches for this distribution
view release on metacpan or search on metacpan
lisp/doc/pde.info view on Meta::CPAN
Version 1.1 or any later version published by the Free Software
Foundation; with no Invariant Sections, no Front-Cover Texts, and
no Back-Cover Texts. A copy of the license is included in the
section entitled "GNU Free Documentation License".
* Menu:
* Introduction:: A introduction to PDE
* Installation:: Installation
* pde-load:: Default configuration for PDE
* pde:: Integrate other libraries
lisp/doc/pde.info view on Meta::CPAN
Function Index
**************
[index]
* Menu:
* define-template-expander: template-simple. (line 25)
* flymake-mode: pde. (line 154)
* gud-break: perldb-ui. (line 57)
* gud-cont: perldb-ui. (line 54)
lisp/doc/pde.info view on Meta::CPAN
Variable Index
**************
[index]
* Menu:
* compile-dwim-alist: compile-dwim. (line 12)
* compile-dwim-check-tools: compile-dwim. (line 40)
* imenu-tree-auto-update: imenu-tree. (line 9)
* imenu-tree-create-buffer-function: imenu-tree. (line 21)
lisp/doc/pde.info view on Meta::CPAN
Keybinding Index
****************
[index]
* Menu:
* ! (tree-mode-collapse-other-except): tree-mode. (line 45)
* / (tree-mode-keep-match): tree-mode. (line 42)
* b (gud-break): perldb-ui. (line 57)
* c (gud-cont): perldb-ui. (line 54)
view all matches for this distribution
view release on metacpan or search on metacpan
t/htmls/regexp_test_2.html view on Meta::CPAN
dropShadows: false,
speed: 200,
delay: 800
});
});
jQuery('.menu-primary-container').mobileMenu({
defaultText: 'Menu',
className: 'menu-primary-responsive',
containerClass: 'menu-primary-responsive-container',
subMenuDash: '–'
});
jQuery(function(){
jQuery('ul.menu-secondary').superfish({
onBeforeShow: function(){ this.css('marginLeft','20px'); },
t/htmls/regexp_test_2.html view on Meta::CPAN
dropShadows: false,
speed: 200,
delay: 800
});
});
jQuery('.menu-secondary-container').mobileMenu({
defaultText: 'Navigation',
className: 'menu-secondary-responsive',
containerClass: 'menu-secondary-responsive-container',
subMenuDash: '–'
});
/* ]]> */
</script>
</body>
view all matches for this distribution
view release on metacpan or search on metacpan
Embedix::ECD::XMLv1(3pm)
=item CML2
The Configuration Menu Language is a constraint-based language
developed by Eric Raymond in an attempt to simplify the process of
configuring the Linux kernel.
http://www.tuxedo.org/~esr/kbuild/
view all matches for this distribution
view release on metacpan or search on metacpan
eg/forms/wizard/do.epl view on Meta::CPAN
[$endsub$]
[$ sub abort_button $]
[* my $r = shift ; *]
<input type="submit" name="-start" value="Zum Setup Menu" id="next_button" class="cStandardButton">
[$if $r -> {aborturl} $]<input type="submit" name="-abort" value="Setup Beenden" class="cStandardButton"> [$endif$]
[$ endsub $]
[$ sub prev_button $]
[* my $r = shift ; *]
view all matches for this distribution
view release on metacpan or search on metacpan
CNMap/cnmapwx_wdr.pl view on Meta::CPAN
}
$item0;
}
# Menu bar functions
# Bitmap functions
use Wx qw( wxNullBitmap wxBITMAP_TYPE_PNG );
view all matches for this distribution
view release on metacpan or search on metacpan
examples/Utr22c.clb view on Meta::CPAN
H="testutr22"
^!Clip InitDir
^!Set %testseq%=^?{Test Sequence=^%testseq%}
^!Menu File/Save
; ^!Prompt "^%MyAppDir%testutr22.exe -o "^%MyAppDir%testutr22.lst" -bu "^$GetDocName$" "^%testseq%""
^!Set %testresult%=^$GetOutput("^%MyAppDir%testutr22.exe -o "^%MyAppDir%testutr22.lst" -bu "^$GetDocName$" "^%testseq%"")$
^!IfFileExist "^%MyAppDir%testutr22.lst" NEXT ELSE failed
^!Open "^%MyAppDir%testutr22.lst" /R
^!Goto END
examples/Utr22c.clb view on Meta::CPAN
H="Web page"
^!Clip InitDir
^!Menu File/Save
^!Url ^$FileToUrl(^$GetDocName$)$
H="Compile TEC"
^!Clip InitDir
^!Set %fname%=^$ChangeFileExt(^$GetDocName$;"tec")$
^!Set %outfile%=^?{(T=S;F="TEC Files(*.tec)|*.tec")Save As=^%fname%}
^!Menu File/Save
;^!Prompt ^%MyAppDir%utr22tec.exe "^$GetDocName$" "^%outfile%"
^!Set %output%=^$GetOutput(^%MyAppDir%utr22tec.exe "^$GetDocName$" "^%outfile%")$
^!If ^%output% = "" quiet
^!Toolbar New Document
^%output%
view all matches for this distribution
view release on metacpan or search on metacpan
t/0108-realworld-web-patterns.t view on Meta::CPAN
<li><a href="/products/beta">Beta</a></li>
</ul>
</li>
<li><a href="/contact" class="nav-link">Contact</a></li>
</ul>
<button class="nav-toggle" aria-controls="nav-links" aria-expanded="false">Menu</button>
</nav>
END
my $exp = <<'END';
<nav class="site-nav" aria-label="Main navigation">
<div class="nav-brand">
t/0108-realworld-web-patterns.t view on Meta::CPAN
<li><a href="/products/beta">Beta</a></li>
</ul>
</li>
<li><a href="/contact" class="nav-link">Contact</a></li>
</ul>
<button class="nav-toggle" aria-controls="nav-links" aria-expanded="false">Menu</button>
</nav>
END
is(Eshu->indent_html($in), $exp, 'HTML: nested nav with dropdown and aria attributes');
}
view all matches for this distribution
view release on metacpan or search on metacpan
etk_test/etk_test.pl view on Meta::CPAN
frame => "adv",
cb => \&tree_window_show
},
menu => {
label => "Menu",
frame => "adv",
cb => \&menu_window_show
},
combobox => {
etk_test/etk_test.pl view on Meta::CPAN
}
sub menu_window_show
{
my $win = Etk::Window->new();
$win->TitleSet("Etk-Perl Menu Test");
$win->SizeRequestSet(325, 240);
my $box = Etk::VBox->new(0, 0);
my $menubar = Etk::Menu::Bar->new();
$box->Append($menubar);
my $toolbar = Etk::Toolbar->new();
$box->Append($toolbar);
etk_test/etk_test.pl view on Meta::CPAN
my $statusbar = Etk::StatusBar->new();
$box->Append($statusbar, BoxEnd);
my $menu_item = _menu_test_item_new("File", $menubar, $statusbar);
my $menu = Etk::Menu->new();
$menu_item->SubmenuSet($menu);
_menu_test_stock_item_new("Open", DocumentOpen, $menu, $statusbar);
_menu_test_stock_item_new("Save", DocumentSave, $menu, $statusbar);
$menu_item = _menu_test_item_new("Edit", $menubar, $statusbar);
$menu = Etk::Menu->new();
$menu_item->SubmenuSet($menu);
_menu_test_stock_item_new("Cut", EditCut, $menu, $statusbar);
_menu_test_stock_item_new("Copy", EditCopy, $menu, $statusbar);
_menu_test_stock_item_new("Paste", EditPaste, $menu, $statusbar);
$menu_item = _menu_test_item_new("Help", $menubar, $statusbar);
$menu = Etk::Menu->new();
$menu_item->SubmenuSet($menu);
_menu_test_item_new("About", $menu, $statusbar);
$menu = Etk::Menu->new();
$win->SignalConnect("mouse-down", sub { $menu->Popup() });
_menu_test_stock_item_new("Open", DocumentOpen, $menu, $statusbar);
_menu_test_stock_item_new("Save", DocumentSave, $menu, $statusbar);
_menu_seperator_new($menu);
_menu_test_stock_item_new("Cut", EditCut, $menu, $statusbar);
_menu_test_stock_item_new("Copy", EditCopy, $menu, $statusbar);
_menu_test_stock_item_new("Paste", EditPaste, $menu, $statusbar);
_menu_seperator_new($menu);
$menu_item = _menu_test_item_new("Menu Item Test", $menu, $statusbar);
# Sub menu 1
my $submenu1 = Etk::Menu->new();
$menu_item->SubmenuSet($submenu1);
_menu_test_stock_item_new("Item with image", DocumentSave,
$submenu1, $statusbar);
etk_test/etk_test.pl view on Meta::CPAN
my $radio = _menu_test_radio_item_new("Radio 1", undef, $submenu1, $statusbar);
_menu_test_radio_item_new("Radio 2", $radio, $submenu1, $statusbar);
_menu_test_radio_item_new("Radio 3", $radio, $submenu1, $statusbar);
# Sub menu 2
my $submenu2 = Etk::Menu->new();
$menu_item->SubmenuSet($submenu2);
_menu_test_item_new("Child Menu Test", $submenu2, $statusbar);
$win->Add($box);
$win->ShowAll();
}
sub _menu_test_item_new
{
my ($label, $menubar, $statusbar) = @_;
my $menu_item = Etk::Menu::Item->new($label);
$menubar->Append($menu_item);
$menu_item->SignalConnect("selected",
sub { $statusbar->MessagePush($menu_item->LabelGet(), 0) });
$menu_item->SignalConnect("unselected",
sub { $statusbar->MessagePop(0) });
etk_test/etk_test.pl view on Meta::CPAN
sub _menu_test_stock_item_new
{
my ($label, $stockid, $menubar, $statusbar) = @_;
my $menu_item = Etk::Menu::Item::Image->new($label);
my $image = Etk::Image->new($stockid, SizeSmall);
$menu_item->Set($image);
$menubar->Append($menu_item);
$menu_item->SignalConnect("selected",
sub { $statusbar->MessagePush($menu_item->LabelGet(), 0) });
etk_test/etk_test.pl view on Meta::CPAN
sub _menu_test_check_item_new
{
my ($label, $menubar, $statusbar) = @_;
my $menu_item = Etk::Menu::Item::Check->new($label);
$menubar->Append($menu_item);
$menu_item->SignalConnect("selected",
sub { $statusbar->MessagePush($menu_item->LabelGet(), 0) });
$menu_item->SignalConnect("unselected",
sub { $statusbar->MessagePop(0) });
etk_test/etk_test.pl view on Meta::CPAN
my ($label, $radio, $menubar, $statusbar) = @_;
my $menu_item;
if ($radio)
{
$menu_item = Etk::Menu::Item::Radio->new($label, $radio);
}
else
{
$menu_item = Etk::Menu::Item::Radio->new($label);
}
$menubar->Append($menu_item);
$menu_item->SignalConnect("selected",
sub { $statusbar->MessagePush($menu_item->LabelGet(), 0) });
$menu_item->SignalConnect("unselected",
etk_test/etk_test.pl view on Meta::CPAN
}
sub _menu_seperator_new
{
my ($menubar) = @_;
my $menu_item = Etk::Menu::Item::Separator->new();
$menubar->Append($menu_item);
return $menu_item;
}
sub __combobox_entry_populate
view all matches for this distribution
view release on metacpan or search on metacpan
demo/perlqt.t view on Meta::CPAN
});
my $w = MyMainWindow->new;
my $mb = $w->menuBar;
my $file = Qt::PopupMenu->new;
$file->insertItem("Open...", $w, 'open_file()');
$file->insertItem("Quit", $w, 'quit()');
$mb->insertItem("File", $file);
my $at = int rand 1000;
view all matches for this distribution
view release on metacpan or search on metacpan
examples/protection.pl view on Meta::CPAN
$worksheet->write_formula( 'B2', '=1+2', $unlocked, 3 );
$worksheet->write( 'A3', "Cell B3 is hidden. The formula isn't visible." );
$worksheet->write_formula( 'B3', '=1+2', $hidden, 3 );
$worksheet->write( 'A5', 'Use Menu->Tools->Protection->Unprotect Sheet' );
$worksheet->write( 'A6', 'to remove the worksheet protection.' );
$workbook->close();
__END__
view all matches for this distribution
view release on metacpan or search on metacpan
public/assets/js/bootstrap.js view on Meta::CPAN
$parent = $(selector)
$parent.length || ($parent = $this.parent())
isActive = $parent.hasClass('open')
clearMenus()
!isActive && $parent.toggleClass('open')
return false
}
}
function clearMenus() {
$(toggle).parent().removeClass('open')
}
/* DROPDOWN PLUGIN DEFINITION
public/assets/js/bootstrap.js view on Meta::CPAN
/* APPLY TO STANDARD DROPDOWN ELEMENTS
* =================================== */
$(function () {
$('html').on('click.dropdown.data-api', clearMenus)
$('body').on('click.dropdown.data-api', toggle, Dropdown.prototype.toggle)
})
}( window.jQuery );
/* =============================================================
view all matches for this distribution
view release on metacpan or search on metacpan
is($one->menu, 0, "no menu");
ok(!Fake::Exporter2->can('IMPORTER_MENU'), "No IMPORTER_MENU");
$one->inject_menu;
is($one->menu, 1, "Menu injected");
like(
{Fake::Exporter2->IMPORTER_MENU},
{
export => [],
view all matches for this distribution
view release on metacpan or search on metacpan
scripts/mmkrpbp view on Meta::CPAN
you don't include the C<-I> option -- F<mmkrpbp> will then switch to
interactive mode so that you can finish entering arguments at the prompts.
=head1 USAGE::More
=head2 Menus
F<mmkrpbp> is, for all practical purposes, a clone of F<modulemaker>, the
command-line utility associated with F<ExtUtils::ModuleMaker>. For
description of F<mmkrpbp> menus and features currently supported by
command-line options, please see the documentation for F<modulemaker>.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/ExtUtils/nvcc.pm view on Meta::CPAN
reverse-engineered, I don't know what is.
=head2 Visual Studio Command Prompt
When you install Visual Studio (as of Visual Studio 2010), you will get a Start
Menu entry for Visual Studio Command Prompt. You should run your build processes
(i.e. cpan) from one of these command prompts. Among other things, this command
prompt sets all of the necessary environment variables to ensure that the
compiler can be found, and that the compiler can find all the necessary
libraries. This may or may not be necessary for using nvcc directly, but it is
certainly is necessary for the rest of the Perl toolchain to find cl.exe and
view all matches for this distribution
view release on metacpan or search on metacpan
lib/FAQ/OMatic/Language_de_iso8859_1.pm view on Meta::CPAN
msgstr "Neues Config-File erzeugt."
msgid "The idfile exists."
msgstr "Das ID-File ist vorhanden."
msgid "Configuration Main Menu (install module)"
msgstr "Konfigurationsmenü"
msgid "Go To Install/Configuration Page"
msgstr "Zum Konfigurationsmenü"
view all matches for this distribution
view release on metacpan or search on metacpan
lib/FBP/Perl.pm view on Meta::CPAN
OnCombobox => [ 2, 'EVT_COMBOBOX' ],
OnListBox => [ 2, 'EVT_LISTBOX' ],
OnListBoxDClick => [ 2, 'EVT_LISTBOX_DCLICK' ],
OnText => [ 2, 'EVT_TEXT' ],
OnTextEnter => [ 2, 'EVT_TEXT_ENTER' ],
OnMenu => [ 2, 'EVT_MENU' ],
# wxColourPickerCtrl
OnColourChanged => [ 2, 'EVT_COLOURPICKER_CHANGED' ],
# wxCloseEvent
lib/FBP/Perl.pm view on Meta::CPAN
OnListColRightClick => [ 2, 'EVT_LIST_COL_RIGHT_CLICK' ],
OnListColBeginDrag => [ 2, 'EVT_LIST_COL_BEGIN_DRAG' ],
OnListColDragging => [ 2, 'EVT_LIST_COL_DRAGGING' ],
OnListColEndDrag => [ 2, 'EVT_LIST_COL_END_DRAG' ],
# wxMenuEvent
OnMenuSelection => [ 2, 'EVT_MENU' ],
# wxMouseEvent
OnEnterWindow => [ 1, 'EVT_ENTER_WINDOW' ],
OnLeaveWindow => [ 1, 'EVT_LEAVE_WINDOW' ],
OnLeftDClick => [ 1, 'EVT_LEFT_DCLICK' ],
lib/FBP/Perl.pm view on Meta::CPAN
OnTreeItemRightClick => [ 2, 'EVT_TREE_ITEM_RIGHT_CLICK' ],
OnTreeItemMiddleClick => [ 2, 'EVT_TREE_ITEM_MIDDLE_CLICK' ],
OnTreeSelChanged => [ 2, 'EVT_TREE_SEL_CHANGED' ],
OnTreeSelChanging => [ 2, 'EVT_TREE_SEL_CHANGING' ],
OnTreeKeyDown => [ 2, 'EVT_TREE_KEY_DOWN' ],
OnTreeItemMenu => [ 2, 'EVT_TREE_ITEM_MENU' ],
);
# Event Connect Binding Table
our %CONNECT = (
# Common low level events
lib/FBP/Perl.pm view on Meta::CPAN
# OnCombobox => 'wxEVT_COMMAND_COMBOBOX_SELECTED',
# OnListBox => 'wxEVT_COMMAND_LISTBOX_SELECTED',
# OnListBoxDClick => 'wxEVT_COMMAND_LISTBOX_DOUBLECLICKED',
# OnText => 'wxEVT_COMMAND_TEXT_UPDATED',
# OnTextEnter => 'wxEVT_COMMAND_TEXT_ENTER',
# OnMenu => 'wxEVT_COMMAND_MENU_SELECTED',
# # wxColourPickerCtrl
# OnColourChanged => 'wxEVT_COLOURPICKER_CHANGED',
# # wxCloseEvent
lib/FBP/Perl.pm view on Meta::CPAN
my $self = shift;
my $form = shift;
my @objects = (
$form,
$form->find( isa => 'FBP::Window' ),
$form->find( isa => 'FBP::MenuItem' ),
$form->find( isa => 'FBP::StdDialogButtonSizer' ),
);
my %seen = ();
my %done = ();
my @methods = ();
lib/FBP/Perl.pm view on Meta::CPAN
}
} elsif ( $window->isa('FBP::ListBox') ) {
$lines = $self->listbox_create($window, $parent);
} elsif ( $window->isa('FBP::ListCtrl') ) {
$lines = $self->listctrl_create($window, $parent);
} elsif ( $window->isa('FBP::MenuBar') ) {
$lines = $self->menubar_create($window, $parent);
} elsif ( $window->isa('FBP::Notebook') ) {
$lines = $self->notebook_create($window, $parent);
} elsif ( $window->isa('FBP::Panel') ) {
$lines = $self->panel_create($window, $parent);
lib/FBP/Perl.pm view on Meta::CPAN
my $scope = $self->object_scope($menu);
my $variable = $self->object_variable($menu);
# Generate our children
my @lines = (
"$scope$variable = Wx::Menu->new;",
"",
);
foreach my $child ( @{$menu->children} ) {
if ( $child->isa('FBP::Menu') ) {
push @lines, @{ $self->menu_create($child, $menu) };
} elsif ( $child->isa('FBP::MenuItem') ) {
push @lines, @{ $self->menuitem_create($child, $menu) };
} else {
next;
}
push @lines, "";
}
# Fill the menu
foreach my $child ( @{$menu->children} ) {
if ( $child->isa('FBP::Menu') ) {
push @lines, $self->nested(
"$variable->Append(",
$self->object_variable($_) . ',',
$self->object_label($_) . ',',
");",
);
} elsif ( $child->isa('FBP::MenuItem') ) {
push @lines, "$variable->Append( "
. $self->object_variable($child)
. " );";
} elsif ( $child->isa('FBP::MenuSeparator') ) {
push @lines, "$variable->AppendSeparator;";
}
}
return \@lines;
lib/FBP/Perl.pm view on Meta::CPAN
)
} @{$window->children};
return [
( map { @$_, "" } @children ),
"$scope$variable = Wx::MenuBar->new($style);",
"",
@append,
"",
"$parent->SetMenuBar( $variable );",
];
}
sub menuitem_create {
my $self = shift;
lib/FBP/Perl.pm view on Meta::CPAN
my $help = $self->text( $menu->help );
my $kind = $self->wx( $menu->kind );
# Create the menu item
my $lines = $self->nested(
"$scope$variable = Wx::MenuItem->new(",
"$parent,",
"$id,",
"$label,",
"$help,",
"$kind,",
view all matches for this distribution
view release on metacpan or search on metacpan
use FBP::HyperlinkCtrl ();
use FBP::Listbook ();
use FBP::ListbookPage ();
use FBP::ListBox ();
use FBP::ListCtrl ();
use FBP::Menu ();
use FBP::MenuBar ();
use FBP::MenuItem ();
use FBP::MenuSeparator ();
use FBP::Notebook ();
use FBP::NotebookPage ();
use FBP::Panel ();
use FBP::RadioBox ();
use FBP::RadioButton ();
view all matches for this distribution
view release on metacpan or search on metacpan
sub FL_Page_Up {0xff55;}
sub FL_Page_Down {0xff56;}
sub FL_End {0xff57;}
sub FL_Print {0xff61;}
sub FL_Insert {0xff63;}
sub FL_Menu {0xff67;}
sub FL_Num_Lock {0xff7f;}
sub FL_KP {0xff80;}
sub FL_KP_Enter {0xff8d;}
sub FL_KP_Last {0xffbd;}
sub FL_F {0xffbd;}
FL_Page_Up
FL_Page_Down
FL_End
FL_Print
FL_Insert
FL_Menu
FL_Num_Lock
FL_KP
FL_KP_Enter
FL_KP_Last
FL_F
package Fl_Tile;
use strict;
use vars qw(@ISA);
@ISA = qw( Fl_Group );
package Fl_Menu_;
use strict;
use vars qw(@ISA);
@ISA = qw( Fl_Group );
package Fl_Item_Group;
use strict;
use vars qw(@ISA);
@ISA = qw( Fl_Menu_ );
package Fl_Menu_Bar;
use strict;
use vars qw(@ISA);
@ISA = qw( Fl_Menu_ );
package Fl_Menu_Button;
use strict;
use vars qw(@ISA);
@ISA = qw( Fl_Menu_ );
sub NORMAL {224;}
sub POPUP1 {225;}
sub POPUP2 {226;}
sub POPUP12 {227;}
sub POPUP123 {231;}
package Fl_Choice;
use strict;
use vars qw(@ISA);
@ISA = qw( Fl_Menu_ );
package Fl_Browser;
use strict;
use vars qw(@ISA);
@ISA = qw( Fl_Menu_ );
sub HORIZONTAL {1;}
sub VERTICAL {2;}
sub BOTH {3;}
sub ALWAYS_ON {4;}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Ham/Device/FT817COMM.pm view on Meta::CPAN
=item getExtmenu()
$extmenu = $FT817->getExtmenu();
MENU ITEM # 52 - Shows the Extended Menu Setting ON /OFF
=item getFasttuning()
$fasttune = $FT817->getFasttuning();
view all matches for this distribution
view release on metacpan or search on metacpan
lib/FWS/V2.pm view on Meta::CPAN
$self->{securityHash}->{showQueue}{note} = 'Access to view email sending queue, and message history.';
$self->{securityHash}->{showSEO}{title} = 'SEO Controls';
$self->{securityHash}->{showSEO}{note} = 'Access to change SEO Defaults, content and page properties.';
$self->{securityHash}->{showSiteSettings}{title} = 'Site Settings Menu';
$self->{securityHash}->{showSiteSettings}{note} = 'Generic site settings and 3rd party connector configurations.';
$self->{securityHash}->{showSiteUsers}{title} = 'User Account Access';
$self->{securityHash}->{showSiteUsers}{note} = 'Access to create, delete and modify high level information for site accounts and groups.';
view all matches for this distribution
view release on metacpan or search on metacpan
t/html/fablab61.html view on Meta::CPAN
</ul>
</div>
<script type="text/javascript">
$('ul.nav-navigation').flexMenu({
showOnHover: false
})
</script>
<div class="nav-filter-wrapper">
<ul class="nav nav-filter">
view all matches for this distribution
view release on metacpan or search on metacpan
lib/Farabi/files/public/assets/codemirror/lib/codemirror.js view on Meta::CPAN
// True when shift is held down.
d.shift = false;
// Used to track whether anything happened since the context menu
// was opened.
d.selForContextMenu = null;
}
// STATE UPDATES
// Used to get the editor into a consistent state again when options change.
lib/Farabi/files/public/assets/codemirror/lib/codemirror.js view on Meta::CPAN
var withOp = !cm.curOp;
if (withOp) startOperation(cm);
cm.display.shift = false;
if (text.charCodeAt(0) == 0x200b && doc.sel == cm.display.selForContextMenu && !prevInput)
prevInput = "\u200b";
// Find the part of the input that is actually new
var same = 0, l = Math.min(prevInput.length, text.length);
while (same < l && prevInput.charCodeAt(same) == text.charCodeAt(same)) ++same;
var inserted = text.slice(same), textLines = splitLines(inserted);
lib/Farabi/files/public/assets/codemirror/lib/codemirror.js view on Meta::CPAN
if (!eventInWidget(d, e)) e_preventDefault(e);
});
// Some browsers fire contextmenu *after* opening the menu, at
// which point we can't mess with it anymore. Context menu is
// handled in onMouseDown for these browsers.
if (!captureRightClick) on(d.scroller, "contextmenu", function(e) {onContextMenu(cm, e);});
// Sync scrolling between fake scrollbars and real scrollable
// area, ensure viewport is updated when scrolling.
on(d.scroller, "scroll", function() {
if (d.scroller.clientHeight) {
lib/Farabi/files/public/assets/codemirror/lib/codemirror.js view on Meta::CPAN
if (start) extendSelection(cm.doc, start);
setTimeout(bind(focusInput, cm), 20);
e_preventDefault(e);
break;
case 3:
if (captureRightClick) onContextMenu(cm, e);
break;
}
}
var lastClick, lastDoubleClick;
lib/Farabi/files/public/assets/codemirror/lib/codemirror.js view on Meta::CPAN
cm.state.focused = true;
addClass(cm.display.wrapper, "CodeMirror-focused");
// The prevInput test prevents this from firing when a context
// menu is closed (since the resetInput would kill the
// select-all detection hack)
if (!cm.curOp && cm.display.selForContextMenu != cm.doc.sel) {
resetInput(cm);
if (webkit) setTimeout(bind(resetInput, cm, true), 0); // Issue #1730
}
}
slowPoll(cm);
lib/Farabi/files/public/assets/codemirror/lib/codemirror.js view on Meta::CPAN
// CONTEXT MENU HANDLING
// To make the context menu work, we need to briefly unhide the
// textarea (making it as unobtrusive as possible) to let the
// right-click take effect on it.
function onContextMenu(cm, e) {
if (signalDOMEvent(cm, e, "contextmenu")) return;
var display = cm.display;
if (eventInWidget(display, e) || contextMenuInGutter(cm, e)) return;
var pos = posFromMouse(cm, e), scrollPos = display.scroller.scrollTop;
if (!pos || presto) return; // Opera is difficult.
// Reset the current text selection only if the click is done outside of the selection
// and 'resetSelectionOnContextMenu' option is true.
var reset = cm.options.resetSelectionOnContextMenu;
if (reset && cm.doc.sel.contains(pos) == -1)
operation(cm, setSelection)(cm.doc, simpleSelection(pos), sel_dontScroll);
var oldCSS = display.input.style.cssText;
display.inputDiv.style.position = "absolute";
lib/Farabi/files/public/assets/codemirror/lib/codemirror.js view on Meta::CPAN
"; outline: none; border-width: 0; outline: none; overflow: hidden; opacity: .05; filter: alpha(opacity=5);";
focusInput(cm);
resetInput(cm);
// Adds "Select all" to context menu in FF
if (!cm.somethingSelected()) display.input.value = display.prevInput = " ";
display.selForContextMenu = cm.doc.sel;
clearTimeout(display.detectingSelectAll);
// Select-all will be greyed out if there's nothing to select, so
// this adds a zero-width space so that we can later check whether
// it got selected.
lib/Farabi/files/public/assets/codemirror/lib/codemirror.js view on Meta::CPAN
var extval = display.input.value = "\u200b" + (selected ? display.input.value : "");
display.prevInput = selected ? "" : "\u200b";
display.input.selectionStart = 1; display.input.selectionEnd = extval.length;
// Re-set this, in case some other handler touched the
// selection in the meantime.
display.selForContextMenu = cm.doc.sel;
}
}
function rehide() {
display.inputDiv.style.position = "relative";
display.input.style.cssText = oldCSS;
lib/Farabi/files/public/assets/codemirror/lib/codemirror.js view on Meta::CPAN
// Try to detect the user choosing select-all
if (display.input.selectionStart != null) {
if (!ie || ie_upto8) prepareSelectAllHack();
var i = 0, poll = function() {
if (display.selForContextMenu == cm.doc.sel && display.input.selectionStart == 0)
operation(cm, commands.selectAll)(cm);
else if (i++ < 10) display.detectingSelectAll = setTimeout(poll, 500);
else resetInput(cm);
};
display.detectingSelectAll = setTimeout(poll, 200);
lib/Farabi/files/public/assets/codemirror/lib/codemirror.js view on Meta::CPAN
} else {
setTimeout(rehide, 50);
}
}
function contextMenuInGutter(cm, e) {
if (!hasHandler(cm, "gutterContextMenu")) return false;
return gutterEvent(cm, e, "gutterContextMenu", false, signal);
}
// UPDATING
// Compute the position of the end of a change (its 'to' property
lib/Farabi/files/public/assets/codemirror/lib/codemirror.js view on Meta::CPAN
origin: change.origin
};
if (changeHandler) signalLater(cm, "change", cm, obj);
if (changesHandler) (cm.curOp.changeObjs || (cm.curOp.changeObjs = [])).push(obj);
}
cm.display.selForContextMenu = null;
}
function replaceRange(doc, code, from, to, origin) {
if (!to) to = from;
if (cmp(to, from) < 0) { var tmp = to; to = from; from = tmp; }
lib/Farabi/files/public/assets/codemirror/lib/codemirror.js view on Meta::CPAN
}, true);
option("firstLineNumber", 1, guttersChanged, true);
option("lineNumberFormatter", function(integer) {return integer;}, guttersChanged, true);
option("showCursorWhenSelecting", false, updateSelection, true);
option("resetSelectionOnContextMenu", true);
option("readOnly", false, function(cm, val) {
if (val == "nocursor") {
onBlur(cm);
cm.display.input.blur();
view all matches for this distribution
view release on metacpan or search on metacpan
t/data/link.html view on Meta::CPAN
<label>
<span class="screen-reader-text">Search for:</span>
<input type="search" class="search-field" placeholder="Search …" value="" name="s" />
</label>
<input type="submit" class="search-submit" value="Search" />
</form></aside><aside id="nav_menu-2" class="widget widget_nav_menu"><h4 class="widget-title">Menu</h4><div class="menu-menu-container"><ul id="menu-menu-1" class="menu"><li class="menu-item menu-item-type-post_type menu-item-object-page menu-item...
<li class="menu-item menu-item-type-post_type menu-item-object-page menu-item-4710"><a href="https://dave.org.uk/writing/">Writin’</a></li>
<li class="menu-item menu-item-type-post_type menu-item-object-page menu-item-224591"><a href="https://dave.org.uk/watching/">Watchin’</a></li>
<li class="menu-item menu-item-type-post_type menu-item-object-page menu-item-6165"><a href="https://dave.org.uk/listening/">Listenin’</a></li>
<li class="menu-item menu-item-type-post_type menu-item-object-page menu-item-84180"><a href="https://dave.org.uk/travelling/">Travellin’</a></li>
<li class="menu-item menu-item-type-post_type menu-item-object-page menu-item-4706"><a href="https://dave.org.uk/photos/">Snappin’</a></li>
view all matches for this distribution