Result:
found more than 403 distributions - search limited to the first 2001 files matching your query ( run in 1.265 )


Finance-Quant

 view release on metacpan or  search on metacpan

scripts/FINANCE_QUANT_TRAY  view on Meta::CPAN

}


#right click menu
sub menu {
   my $menu = Gtk2::Menu->new();

   #VCI
   my $menu_VCI = Gtk2::ImageMenuItem->new_with_label("CLI UI");
   $menu_VCI->set_image(Gtk2::Image->new_from_stock('gtk-refresh',
'menu'));

      $menu_VCI->signal_connect(activate => sub {
print system ('financequant &');

scripts/FINANCE_QUANT_TRAY  view on Meta::CPAN



   $menu->add($menu_VCI);

   #configure
   my $menu_pref = Gtk2::ImageMenuItem->new_with_label("XML DUMP");
      $menu_pref->signal_connect(activate => sub {
my $response=0;
 my $error =0;
print system ('FINANCE_QUANT_XML_RESULTS');

scripts/FINANCE_QUANT_TRAY  view on Meta::CPAN

   $menu->add($menu_pref);



   #configure
   my $menu_http = Gtk2::ImageMenuItem->new_with_label("HTTP REPORTS");
      $menu_http->signal_connect(activate => sub {
            system("FINANCE_QUANT_HTTP_SERVER &");
   });
   $menu_http->set_image(Gtk2::Image->new_from_stock('gtk-media-play','menu'));
   $menu->add($menu_http);



   #separator
   my $menu_sep = Gtk2::SeparatorMenuItem->new();
   $menu->add($menu_sep);

   #Quit
   my $menu_quit = Gtk2::ImageMenuItem->new_with_label("Quit");
   $menu_quit->signal_connect(activate => sub {Gtk2->main_quit});
   $menu_quit->set_image(Gtk2::Image->new_from_stock('gtk-quit', 'menu'));
   $menu->add($menu_quit);


scripts/FINANCE_QUANT_TRAY  view on Meta::CPAN




#Program interfaces
sub interface {
   my $interface = Gtk2::Menu->new;

   #menu items for VCI
   #Progress bar for number of downloads; just a countng bar

   #Add the correct controls to menu
   my $menu_vci_connect = Gtk2::ImageMenuItem->new_with_label("Connect");
   $interface->add($menu_vci_connect);
   my $menu_vci_stop = Gtk2::ImageMenuItem->new_with_label("Stop");
   $interface->add($menu_vci_stop);

   $interface->show_all;
    
   

 view all matches for this distribution


Fir

 view release on metacpan or  search on metacpan

lib/Fir.pm  view on Meta::CPAN

  # Jake /about/jake/
 

=head1 DESCRIPTION

Fir is a Tree::DAG_Node subclass for menu nagivation. Menu navigation
on a web application is fiddly code and this module hides that away 
from you. Note that this module only handles the logic, not the 
display of the navigation.

There are two kinds of nodes L<Fir::Major> nodes are allowed to have

 view all matches for this distribution


Firefox-Marionette

 view release on metacpan or  search on metacpan

lib/Firefox/Marionette.pm  view on Meta::CPAN

     DO NOT EDIT! -->
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8">
_HTML_
    $quoted_header_regex =~ s/\\\r?\n/\\s+/smxg;
    my $title_regex  = qr/[<]TITLE[>]Bookmarks[<]\/TITLE[>]\s+/smx;
    my $header_regex = qr/[<]H1[>]Bookmarks(?:[ ]Menu)?[<]\/H1[>]\s+/smx;
    my $list_regex   = qr/[<]DL[>][<]p[>]\s*/smx;

    if ( $contents =~ s/\A\s*$quoted_header_regex\s*//smx ) {
        $contents =~ s/\A\s*<meta[^>]+><\/meta>\s*//smx;
        $contents =~ s/\A$title_regex$header_regex$list_regex//smx;

lib/Firefox/Marionette.pm  view on Meta::CPAN

<!-- This is an automatically generated file.
     It will be read and overwritten.
     DO NOT EDIT! -->
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=UTF-8">
<TITLE>Bookmarks</TITLE>
<H1>Bookmarks Menu</H1>

<DL><p>
    <DT><H3 ADD_DATE="$now" LAST_MODIFIED="$now" PERSONAL_TOOLBAR_FOLDER="true">Bookmarks Toolbar</H3>
    <DL><p>
    </DL><p>

 view all matches for this distribution


Fl

 view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

        - eg/double_click.pl - Custom button widget that detects double clicks
        - eg/drag_and_drop.pl - Example of clipboard access and drag and drop
    - New widgets:
        - Fl::Progress - Typical progress bar
        - Fl::InputChoice - Input widget and menu button rolled into one
        - Fl::Menu - Base class for all widgets that have a menu
        - Fl::MenuButton - Button that pops up a menu when pushed
        - Fl::HtmlView - Simple HTML viewer
    - New demo scripts:
        - eg/progress.pl - Demos using a Fl::Progress bar to keep user up to date on background progress
        - eg/input_choice.pl - Demos using Fl::InputChoice and enabling/disabling widgets
    - Some tests require a working DISPLAY on X11

 view all matches for this distribution


Flower

 view release on metacpan or  search on metacpan

public/assets/js/main.js  view on Meta::CPAN

(function(){var e,t,n,r,o,i,s,a,l,c,u,p,h,d,f,m,y,g,v,b,T,x,_,C,E,w,P,S,k,D,R,M,O,A,I,N,j,L,F,B,U,H,W,z,K,V,q,Y,G,X,Q,$,J,Z,ee,te,ne=[].indexOf||function(e){for(var t=0,n=this.length;n>t;t++)if(t in this&&this[t]===e)return t;return-1},re=function(e,...
var o=document.body,i=new Headroom(o,{offset:n.position});i.init()},handleScroll:function(e){var t=document.documentElement.scrollTop?document.documentElement.scrollTop:document.body.scrollTop;for(var n in r.elements){var o=r.elements[n],i=r.getPosit...
}}var r=new Error;if("string"==typeof r.stack&&r.stack.split("\n")[0].indexOf("stackDetection@")>=0)return m=/@/,y=t,g=!0,function(e){e.stack=(new Error).stack};var o;try{throw new Error}catch(i){o="stack"in i}return"stack"in r||!o||"number"!=typeof ...
for(var p=this._promise,h=0;u>h;++h){var d=this._isResolved(),f=r(s[h],p);f instanceof t?(f=f._target(),d?f._ignoreRejections():f._isPending()?f._proxyPromiseArray(this,h):f._isFulfilled()?this._promiseFulfilled(f._value(),h):this._promiseRejected(f....
return Fs(e,t,ti)}function Mt(e,t){return Fs(e,t,Ua)}function Ot(e,t){return Bs(e,t,Ua)}function At(e,t){for(var n=-1,r=t.length,o=-1,i=[];++n<r;){var s=t[n];Io(e[s])&&(i[++o]=s)}return i}function It(e,t,n){if(null!=e){n!==w&&n in pr(e)&&(t=[n]);for(...
var n=t.length;return vo(function(r){for(var o=Cs(r.length,n);o--;)r[o]=t[o](r[o]);return e.apply(this,r)})}),Pa=Rn(O),Sa=Rn(A),ka=vo(function(e,t){return Ln(e,N,w,w,w,Dt(t))}),Da=bs||function(e){return g(e)&&nr(e.length)&&rs.call(e)==q},Ra=pn(Ht),Ma...
return n}var o=Object.assign||function(e){for(var t=1;t<arguments.length;t++){var n=arguments[t];for(var r in n)Object.prototype.hasOwnProperty.call(n,r)&&(e[r]=n[r])}return e},i=e("react"),s=e("./mixins/style-propable"),a=e("./styles/auto-prefix"),l...
return this.context.muiTheme.component.datePicker},render:function(){var e=this.props,t=(e.className,e.year),n=(e.onTouchTap,e.selected),s=r(e,["className","year","onTouchTap","selected"]),l={root:{boxSizing:"border-box",WebkitTapHighlightColor:"rgba...
label:o,labelPosition:s.PropTypes.oneOf(["before","after"]),labelStyle:s.PropTypes.object,onKeyboardFocus:s.PropTypes.func,onMouseEnter:s.PropTypes.func,onMouseLeave:s.PropTypes.func,onTouchStart:s.PropTypes.func,primary:s.PropTypes.bool,rippleColor:...
v&&this._pushElement(U,v,this.mergeStyles(B.avatars,B.leftAvatar)),C&&this._pushElement(U,C,this.mergeStyles(B.avatars,B.rightAvatar)),b&&this._pushElement(U,b,this.mergeStyles(B.leftCheckbox));var H=x.length,W=C||E||w||P,z=H&&t&&!W;if(w||z){var K=w,...
return p&&(h=this.state.isKeyboardFocused?"keyboard-focused":"focused"),i.cloneElement(e,{desktop:s,focusState:h,onTouchTap:function(t){r._handleMenuItemTouchTap(t,e),e.props.onTouchTap&&e.props.onTouchTap(t)},ref:p?"focusedMenuItem":null,style:u})},...
errorStyle:i.PropTypes.object,hintText:i.PropTypes.string,id:i.PropTypes.string,multiLine:i.PropTypes.bool,onBlur:i.PropTypes.func,onChange:i.PropTypes.func,onFocus:i.PropTypes.func,onKeyDown:i.PropTypes.func,onEnterKeyDown:i.PropTypes.func,type:i.Pr...
mixins:[o],render:function(){return r.createElement(i,this.props,r.createElement("path",{d:"M15.41 7.41L14 6l-6 6 6 6 1.41-1.41L10.83 12z"}))}});t.exports=s},{"../../svg-icon":128,"react/addons":196}],136:[function(e,t,n){"use strict";var r=e("react/...
},underlineFocus:{borderBottom:"solid 2px",borderColor:t.focusColor,transform:"scaleX(0)",transition:c.easeOut()}};return r.error=this.mergeAndPrefix(r.error,e.errorStyle),r.underline=this.mergeAndPrefix(r.underline,e.underlineStyle),r.floatingLabel=...
e.target.style.color=this.getStyles().icon.hover.color},_handleMouseLeaveFontIcon:function(e){e.target.style.zIndex="auto",e.target.style.color=this.getStyles().icon.root.color}});t.exports=s},{"../mixins/style-propable":103,"../styles/colors":120,re...
return"https://checkout.stripe.com/checkout.js"},statics:{stripeHandler:null,scriptDidError:!1},hasPendingClick:!1,onScriptLoaded:function(){this.setState({scriptLoading:!1}),s.stripeHandler||this.updateStripeHandler()},updateStripeHandler:function()...
if(i.canUseDOM){var d=document.implementation;r=d&&d.hasFeature&&d.hasFeature("http://www.w3.org/TR/SVG11/feature#BasicStructure","1.1")}var f={isCustomAttribute:RegExp.prototype.test.bind(/^(data|aria)-[a-z_][a-z\d_.\-]*$/),Properties:{accept:null,a...
r===C&&(i&&(i=this._previousStyleCopy=m({},t.style)),i=a.createMarkupForStyles(i));var s=c.createMarkupForProperty(r,i);s&&(n+=" "+s)}}if(e.renderToStaticMarkup)return n+">";var l=c.createMarkupForID(this._rootNodeID);return n+" "+l+">"},_createConte...
},getSelectionInformation:function(){var e=a();return{focusedElem:e,selectionRange:l.hasSelectionCapabilities(e)?l.getSelection(e):null}},restoreSelection:function(e){var t=a(),n=e.focusedElem,o=e.selectionRange;t!==n&&r(n)&&(l.hasSelectionCapabiliti...
function r(e){e!==i.currentlyMountingInstance&&c.enqueueUpdate(e)}function o(e,t){p(null==s.current);var n=l.get(e);return n?n===i.currentlyUnmountingInstance?null:n:null}var i=e("./ReactLifeCycle"),s=e("./ReactCurrentOwner"),a=e("./ReactElement"),l=...
357:[function(e,t,n){"use strict";var r,o=e("./ExecutionEnvironment");o.canUseDOM&&(r=window.performance||window.msPerformance||window.webkitPerformance),t.exports=r||{}},{"./ExecutionEnvironment":217}],358:[function(e,t,n){var r=e("./performance");r...
})}function r(){o?(o(function(){t.ReactRailsUJS.mountComponents()}),o(t).unload(function(){t.ReactRailsUJS.unmountComponents()})):(e.addEventListener("DOMContentLoaded",function(){t.ReactRailsUJS.mountComponents()}),t.addEventListener("unload",functi...

 view all matches for this distribution



FrameMaker-FromHTML

 view release on metacpan or  search on metacpan

FromHTML.pm  view on Meta::CPAN

 <DViewRect 24 45 601 498 >
 <DWindowRect 2 2 669 583 >
 <DViewScale  100.0%>
 <DNextUnique 216474>
 <DPageSize  21.0 cm 29.7 cm>
 <DMenuBar `'>
 <DVoMenuBar `'>
 <DStartPage 1>
 <DPageNumStyle Arabic>
 <DPagePointStyle Arabic>
 <DTwoSides Yes>
 <DParity FirstRight>

FromHTML.pm  view on Meta::CPAN

 <DPageScrolling Variable>
 <DViewOnly No>
 <DViewOnlyXRef GotoBehavior>
 <DViewOnlySelect Yes>
 <DViewOnlyWinBorders Yes>
 <DViewOnlyWinMenubar Yes>
 <DViewOnlyWinPopup Yes>
 <DViewOnlyWinPalette No>
 <DFluid No>
 <DFluidSideheads No>
 <DGridOn No>

 view all matches for this distribution


FrameMaker-MifTree

 view release on metacpan or  search on metacpan

lib/FrameMaker/MifTree/MifTreeTags  view on Meta::CPAN

                               BNextUnique
                               BViewOnly
                               BViewOnlyNoOp
                               BViewOnlyPopup
                               BViewOnlyWinBorders
                               BViewOnlyWinMenubar
                               BDisplayText
                               BWindowRect
                               PDFBookInfo
                               BookFileInfo
                               BXmlDocType

lib/FrameMaker/MifTree/MifTreeTags  view on Meta::CPAN

                               DMathSmallVert
                               DMathStrings
                               DMathVariables
                               DMaxInterLine
                               DMaxInterPgf
                               DMenuBar
                               DNarrowRubiSpaceForJapanese
                               DNarrowRubiSpaceForOther
                               DNextUnique
                               DNoPrintSepColor
                               DPDFAllNamedDestinations

lib/FrameMaker/MifTree/MifTreeTags  view on Meta::CPAN

                               DUseInitialStructure
                               DViewOnly
                               DViewOnlyNoOp
                               DViewOnlySelect
                               DViewOnlyWinBorders
                               DViewOnlyWinMenubar
                               DViewOnlyWinPalette
                               DViewOnlyWinPopup
                               DViewOnlyXRef
                               DViewRect
                               DViewScale
                               DVoMenuBar
                               DWideRubiSpaceForJapanese
                               DWideRubiSpaceForOther
                               DWindowRect
                               DocFileInfo
                               FNoteStartNum

lib/FrameMaker/MifTree/MifTreeTags  view on Meta::CPAN

  BUseInitialStructure                           => 'boolean',
  BViewOnly                                      => 'boolean',
  BViewOnlyNoOp                                  => '0xnnn',
  BViewOnlyPopup                                 => 'boolean',
  BViewOnlyWinBorders                            => 'boolean',
  BViewOnlyWinMenubar                            => 'boolean',
  BWindowRect                                    => 'X_Y_W_H',
  BXmlDocType                                    => 'string',
  BXmlEncoding                                   => 'string',
  BXmlFileEncoding                               => 'string',
  BXmlStandAlone                                 => 'integer',

lib/FrameMaker/MifTree/MifTreeTags  view on Meta::CPAN

  DMathSmallVert                                 => 'dimension',
  DMathStrings                                   => 'tagstring',
  DMathVariables                                 => 'tagstring',
  DMaxInterLine                                  => 'dimension',
  DMaxInterPgf                                   => 'dimension',
  DMenuBar                                       => 'string',
  DNarrowRubiSpaceForJapanese                    => 'keyword',
  DNarrowRubiSpaceForOther                       => 'keyword',
  DNextUnique                                    => 'ID',
  DNoPrintSepColor                               => 'tagstring',
  DPDFAllNamedDestinations                       => 'boolean',

lib/FrameMaker/MifTree/MifTreeTags  view on Meta::CPAN

  DUseInitialStructure                           => 'boolean',
  DViewOnly                                      => 'boolean',
  DViewOnlyNoOp                                  => '0xnnn',
  DViewOnlySelect                                => 'keyword',
  DViewOnlyWinBorders                            => 'boolean',
  DViewOnlyWinMenubar                            => 'boolean',
  DViewOnlyWinPalette                            => 'boolean',
  DViewOnlyWinPopup                              => 'boolean',
  DViewOnlyXRef                                  => 'keyword',
  DViewRect                                      => 'X_Y_W_H',
  DViewScale                                     => 'percentage',
  DVoMenuBar                                     => 'string',
  DWideRubiSpaceForJapanese                      => 'keyword',
  DWideRubiSpaceForOther                         => 'keyword',
  DWindowRect                                    => 'X_Y_W_H',
  DXmlDocType                                    => 'string',
  DXmlEncoding                                   => 'string',

 view all matches for this distribution


FreeHAL

 view release on metacpan or  search on metacpan

lang_de/word_types.brain  view on Meta::CPAN

  type: n,
kontaktschwach:
  type: adj
Tshwane:
  type: n,
Menuegesteuert:
  type: n,
Kettenfaeden:
  type: n,
wten:
  type: vi

lang_de/word_types.brain  view on Meta::CPAN

  type: n,
Lump:
  type: n,
Laeusekamm:
  type: n,
Menueeintragmenuepunkt:
  type: n,
aufopferungsvoll:
  type: adj
Haesslich:
  type: adv

lang_de/word_types.brain  view on Meta::CPAN

  type: adj
schiffsausbesserungswerk:
  type: adj
e2e4:
  type: n,
Menue:
  type: n,
Arbeitsanzug:
  type: n,
Malle:
  type: n,

lang_de/word_types.brain  view on Meta::CPAN

  type: n,
Sequentialisieren:
  type: n,
sterbeort:
  type: vi
Menuespeisefolge:
  type: n,
Beifallklatscher:
  type: n,
Gebaeudetrakt:
  type: n,

 view all matches for this distribution


Fry-Lib-CDBI-Basic

 view release on metacpan or  search on metacpan

lib/Fry/Lib/CDBI/Basic.pm  view on Meta::CPAN

		cdbi_delete
		*cdbi_update
		*verify_no_delim
		*replace
		cdbi_find_or_create
	Menu based
		cdbi_delete_obj
		cdbi_update_obj
		verify_no_delim_obj
	Debugging via DBI::Profile
		set_dbi_log_level	

lib/Fry/Lib/CDBI/Basic.pm  view on Meta::CPAN

		file, having them in the data could result in incorrect parsing. The
		delimiter is specified by the variable field_delimiter

	cdbi_find_or_create(@search_term): If no result objects found then one is created

=head2 Menu based Commands

 cdbi_delete_obj(@cdbi): same functionality as cdbi_delete
 cdbi_update_obj(@cdbi): same functionality as cdbi_update
 verify_no_delim_obj(@cdbi): same functionality as verify_no_delim

 view all matches for this distribution


Fry-Lib-CPANPLUS

 view release on metacpan or  search on metacpan

lib/Fry/Lib/CPANPLUS.pm  view on Meta::CPAN

		&listInstalledRegex which returns all installed modules that match
		a given regular expression, and &listAuthorsRegex which returns all
                authors matching a regular expression.
	Use the menu option to pass arguments as numbers.

=head2 Using the Menu option

	You invoke the menu option when you want the output of one command to be
		selectively passed to another command ie:
			`-m cm Acme::` followed by `ci 1,4,6`

 view all matches for this distribution


Fry-Shell

 view release on metacpan or  search on metacpan

lib/Fry/Shell.pm  view on Meta::CPAN

Fry::Shell comes with a few handy options (defined in &_default_data): 

	parsecmd: sets the current parsing subroutine, handy when needing to pass a command a
		complex data structure and want to use your own parsing syntax
	cmdlist: sets the current subroutine for autocompleting commands
	menu: sets parsecmd to parseMenu thus putting the user in a menu mode
		where each output line is aliased to a number for the following
		command, explained in SYNOPSIS Explained section
	fh_file: sends command's output to specified file name
	page: sends command's output to preferred pager
	autoview: flag which turns on/off autoview and a command's subroutine outputs for itself

 view all matches for this distribution


Fuse-PDF

 view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

example/Fuse-PDF-App/DragWell.m
example/Fuse-PDF-App/English.lproj/FPAppWindow.nib/classes.nib
example/Fuse-PDF-App/English.lproj/FPAppWindow.nib/info.nib
example/Fuse-PDF-App/English.lproj/FPAppWindow.nib/keyedobjects.nib
example/Fuse-PDF-App/English.lproj/InfoPlist.strings
example/Fuse-PDF-App/English.lproj/MainMenu.nib/classes.nib
example/Fuse-PDF-App/English.lproj/MainMenu.nib/info.nib
example/Fuse-PDF-App/English.lproj/MainMenu.nib/keyedobjects.nib
example/Fuse-PDF-App/FPAppWindow.h
example/Fuse-PDF-App/FPAppWindow.m
example/Fuse-PDF-App/Fuse-PDF-App.xcodeproj/project.pbxproj
example/Fuse-PDF-App/Info.plist
example/Fuse-PDF-App/main.m

 view all matches for this distribution


FusionInventory-Agent

 view release on metacpan or  search on metacpan

resources/generic/ps/macos  view on Meta::CPAN

admin      100   0.0  2.8  3968776 ??       07-21:27:52 /System/Library/CoreServices/Finder.app/Contents/MacOS/Finder
admin      109   0.0  0.2  2496564 ??       07-21:27:50 /System/Library/Frameworks/ApplicationServices.framework/Frameworks/ATS.framework/Support/fontd
admin      113   0.0  0.0  2436408 ??       07-21:27:49 /usr/sbin/pboard
admin      118   0.0  0.3  2460956 ??       07-21:27:47 /usr/libexec/UserEventAgent -l Aqua
admin      126   0.0  0.3  2732816 ??       07-21:27:47 /System/Library/CoreServices/AirPort Base Station Agent.app/Contents/MacOS/AirPort Base Station Agent -launchd -allowquit
admin      130   0.0  0.2  2725604 ??       07-21:27:47 /System/Library/CoreServices/Menu Extras/TextInput.menu/Contents/SharedSupport/TISwitcher.app/Contents/MacOS/TISwitcher
admin      132   0.0  0.5  2770492 ??       07-21:27:47 /Applications/Antidote HD.app/Contents/SharedSupport/AgentAntidote.app/Contents/MacOS/AgentAntidote -psn_0_45067
admin      133   0.0  0.1  2725896 ??       07-21:27:47 /Applications/iTunes.app/Contents/MacOS/iTunesHelper.app/Contents/MacOS/iTunesHelper -psn_0_49164
admin      135   0.0  1.1  3884996 ??       07-21:27:47 /Applications/owncloud.app/Contents/MacOS/owncloud -psn_0_57358
admin      140   0.0  0.2  2723908 ??       07-21:27:47 /Applications/Canon Utilities/IJ Network Scanner Selector EX/Canon IJ Network Scanner Selector EX.app/Contents/CNSSelectorAgent.app/Contents/MacOS/CNSSelectorAgent -psn_0_73746
admin      250   0.0  0.2  2466524 ??       07-20:39:41 /System/Library/Services/AppleSpell.service/Contents/MacOS/AppleSpell -psn_0_180268

 view all matches for this distribution


FvwmPiazza

 view release on metacpan or  search on metacpan

README  view on Meta::CPAN


        # Hotkeys
        Key n               A       3       SendToModule FvwmPiazza "None"
        Key f               A       3       SendToModule FvwmPiazza Full

        Key c               A       3       Popup FPMultiColumnMenu
        Key r               A       3       Popup FPMultiRowMenu
        Key g               A       3       Popup FPMultiGridMenu

        Key Up              A       3       SendToModule FvwmPiazza Increment 1
        Key Down            A       3       SendToModule FvwmPiazza Decrement 1

        Key Left            A       3S      Current (!CirculateHit) SendToModule FvwmPiazza PrevGroup

README  view on Meta::CPAN


        #------------------------------------------------------------------
        # Functions

        # Fake multi-keys by defining menus
        DestroyMenu FPMultiColumnMenu
        AddToMenu FPMultiColumnMenu
        + "&2 Columns" SendToModule FvwmPiazza Columns --max_win 2
        + "&3 Columns" SendToModule FvwmPiazza Columns --max_win 3
        + "&4 Columns" SendToModule FvwmPiazza Columns --max_win 4
        + "&Two-Thirds Columns" SendToModule FvwmPiazza Columns --max_win 2 --ratios 66

        DestroyMenu FPMultiRowMenu
        AddToMenu FPMultiRowMenu
        + "&2 Rows" SendToModule FvwmPiazza Rows --max_win 2
        + "&3 Rows" SendToModule FvwmPiazza Rows --max_win 3
        + "&4 Rows" SendToModule FvwmPiazza Rows --max_win 4
        + "&Two-Thirds Rows" SendToModule FvwmPiazza Rows --max_win 2 66
        + "&Wide" SendToModule FvwmPiazza Wide --max_win 3
        + "&Bottom Wide" SendToModule FvwmPiazza Wide --max_win 3 Bottom
        + "&a) Two-Thirds Wide" SendToModule FvwmPiazza Wide --max_win 3 --height_ratio 2:1

        DestroyMenu FPMultiGridMenu
        AddToMenu FPMultiGridMenu
        + "&4 Grid" SendToModule FvwmPiazza Grid --max_win 4 --cols 2
        + "&6 Grid" SendToModule FvwmPiazza Grid --max_win 6 --cols 3
        + "Tall &Left (1-2)" SendToModule FvwmPiazza Tall --max_win 3
        + "Tall &Right (2-1)" SendToModule FvwmPiazza Tall --max_win 3 Right
        + "&a) Tall Left (1-3)" SendToModule FvwmPiazza Tall --max_win 4

 view all matches for this distribution


GBrowse

 view release on metacpan or  search on metacpan

conf/plugins/PrimerDesigner.pm  view on Meta::CPAN

}

sub detail_select_menu {

<<DETAILS;
<div id="detailSelectMenu">
    <table style="width:100%">
	<tr>
	<th style="background:lightgrey;cell-padding:5">
	    SELECTION
	    <a style="right:0px;position:absolute;color:blue;cursor:pointer" 

 view all matches for this distribution


GDS2

 view release on metacpan or  search on metacpan

Examples/gds2dump  view on Meta::CPAN

    $MW -> title('dumpgds'); 
    $MW -> iconname('dumpgds'); 
    $MW -> minsize(1, 1); 

    ###### start top menu bar #####
    my $wMenu = $MW -> Frame(
        -relief => 'raised', 
        -background => $BGCOLOR,
        -borderwidth => 2,
    );
    $wMenu -> pack(-fill => 'x');

    ##### options menu #####
    my $optionsMenu = $wMenu -> Menubutton(
        -activebackground => $BGCOLOR2,
        -background       => $BGCOLOR,
        -text             => 'Options', 
        -underline        => FALSE,
    );

    $optionsMenu -> separator(
        -background       => $BGCOLOR,
    );

    $optionsMenu -> radiobutton(
        -activebackground => $BGCOLOR, 
        -variable         => \$G_ECHO,
        -label            => 'Echo to terminal',
        -value            => TRUE,
    );

    $optionsMenu -> radiobutton(
        -activebackground => $BGCOLOR, 
        -variable         => \$G_ECHO,
        -label            => 'do not echo to terminal',
        -value            => FALSE,
    );

    ### quit
    $optionsMenu -> command(
        -activebackground => 'Red',
        -background       => $BGCOLOR,
        -label            => 'Exit',
        -command          => sub { $MW -> destroy; exit(1); },
    );
    $optionsMenu -> pack(-side=>'left');

    ##### Help menu #####
    my $textArea;
    my $helpMenu = $wMenu -> Menubutton(
        -text             => 'Help', 
        -activebackground => $BGCOLOR2,
        -background       => $BGCOLOR,
        -underline        => 0
    );
    $helpMenu -> command(
        -activebackground => $BGCOLOR2,
        -background       => $BGCOLOR,
        -label            => 'Program Version',
        -command          => sub {
            $textArea -> delete('0.0', 'end');
            $textArea -> insert('end', "dumpgds $VERSION\n");
            $textArea -> insert('end', "Using Perl $]\n");
        },
    );
    $helpMenu -> separator(
        -background       => $BGCOLOR,
    );
    $helpMenu -> command(
        -activebackground => $BGCOLOR2,
        -background       => $BGCOLOR,
        -label            => 'Print help in text window',
        -command          => sub { \&printUsage($textArea); },
        -activebackground => 'purple',
    );
    $helpMenu -> pack(-side=>'right');
    #### end top menu bar #####################################

    my $progress = $MW -> ProgressBar(
        -anchor => 'w',
        -width  => 20,

 view all matches for this distribution


GTM

 view release on metacpan or  search on metacpan

lib/GTM.pm  view on Meta::CPAN


use common::sense;

use utf8;
use Gtk2;
use Gtk2::SimpleMenu ();
use AnyEvent;
use AnyEvent::Util;
use File::HomeDir       ();
use Gtk2::Ex::PodViewer ();
use POSIX qw(setsid _exit);

lib/GTM.pm  view on Meta::CPAN

}

our $button;

sub new () {
    my $menu = new Gtk2::SimpleMenu (menu_tree => $menu_tree);
    $main_scroll = new_scrolled_textarea();
    $main_window = new Gtk2::Window ('toplevel');
    $main_window->signal_connect (destroy => sub { main_quit Gtk2; });
    win_size ($main_window, "main_window", 960, 600);
    my $v = new Gtk2::VBox;

 view all matches for this distribution


GUIDeFATE

 view release on metacpan or  search on metacpan

lib/GFgtk.pm  view on Meta::CPAN

   my @widgets=();
   my %iVars=();     #vars for interface operation (e.g. 
   my %oVars=();      #vars for interface creation (e.g. list of options)
   my %styles;
   
   my $lastMenuLabel;  #bug workaround in menu generator may be needed for submenus
   
   sub new
   {
    my $class = shift; 
    my $self={};   

lib/GFgtk.pm  view on Meta::CPAN


# setupContent  sets up the initial content before Mainloop can be run.
   sub setupContent{
	   my ($self, $canvas)=@_;
	   $self ->{"menubar"}=undef;
	   my $currentMenu;
	   foreach my $widget (@widgets){
		   my @params=@$widget;
		   my $wtype=shift @params;
		   if ($wtype eq "btn")             {aBt($self, $canvas, @params);}
		   elsif ($wtype eq "textctrl")     {aTC($self, $canvas, @params);}

lib/GFgtk.pm  view on Meta::CPAN

		   elsif ($wtype eq "combo")        {aCB($self, $canvas, @params);}
		   elsif ($wtype eq "sp")           {aSP($self, $canvas, @params);}
		   elsif ($wtype eq "mb")
		                   {
							   if (! $self->{"menubar"}){
							      $self ->{"menubar"} = Gtk3::MenuBar->new;
		                          $canvas->put($self ->{"menubar"},0,0);
		                          }
	                          $currentMenu=aMB($self,$canvas,$currentMenu,@params)
	       }
	   }
	   
	   sub aBt{
	    my ($self,$canvas, $id, $label, $location, $size, $action)=@_;

lib/GFgtk.pm  view on Meta::CPAN

	       }
	       else {print "Combo options not defined for 'combo$id' with label $label\n"}
	        
	   }
        sub aMB{
	     my ($self,$canvas,$currentMenu, $id, $label, $type, $action)=@_;
	     if (($lastMenuLabel) &&($label eq $lastMenuLabel)){return $currentMenu} # bug workaround 
	     else {$lastMenuLabel=$label};	                                         # in menu generator
	     if ($type eq "menuhead"){
			   $currentMenu="menu".$id;
			   $self ->{$currentMenu} = Gtk3::MenuItem->new_with_label($label);
			   $self ->{"sm$currentMenu"}=Gtk3::Menu->new();
			   $self ->{$currentMenu}->set_submenu( $self ->{"sm$currentMenu"} );
			   $self ->{"menubar"}->append($self ->{$currentMenu});
		   }
		   elsif ($type eq "radio"){
			   $self ->{"sm$currentMenu"}->append(Gtk3::RadioMenuItem->new($label));
		   }
		   elsif ($type eq "check"){
			   $self ->{"sm$currentMenu"}->append(Gtk3::CheckMenuItem->new($label));
		   }
		   elsif ($type eq "separator"){
			   $self ->{"sm$currentMenu"}->append(Gtk3::SeparatorMenuItem->new());
		   }
		   else{
			   if($currentMenu!~m/$label/){
				 $self ->{"mi$id"}=Gtk3::MenuItem->new($label);
				 $self ->{"sm$currentMenu"}->append($self ->{"mi$id"});
				 $self ->{"mi$id"}->signal_connect('activate' => $action);			     
			 }
		   }
		   # logging menu generator print "$currentMenu---$id----$label---$type\n";
		   return $currentMenu;
	   }
	   sub aSP{
			 my ($self,$canvas, $id, $panelType, $content, $location, $size)=@_;
			
			if ($panelType eq "I"){  # Image panels start with I

 view all matches for this distribution


Galileo

 view release on metacpan or  search on metacpan

lib/Galileo/DB/Deploy.pm  view on Meta::CPAN

~~Mistaken text.~~
MARKDOWN
    author_id => $admin->user_id,
  });

  $schema->resultset('Menu')->create({
    name => 'main',
    list => j( [ $syntax->page_id, $about->page_id ] ),
  });
}

 view all matches for this distribution


Game-HexDescribe

 view release on metacpan or  search on metacpan

share/hex-describe-schroeder-table.txt  view on Meta::CPAN

1,Mengia
1,Menisha
1,Menna
1,Mennat
1,Menoa
1,Menucha
1,Menuja
1,Menuka
1,Mera
1,Merab
1,Meral
1,Merav
1,Meraviglia

 view all matches for this distribution


Games-AIBots

 view release on metacpan or  search on metacpan

bin/aibots  view on Meta::CPAN


=head1 INTERFACE

=head2 The Setting Panel

=head3 Map Menu

The drop-down menu in the bottom-left corner lists all available 
maps. The ones in square brackets (e.g. [Solania]) denotes a "level" 
with pre-defined bots.

 view all matches for this distribution


Games-Axmud

 view release on metacpan or  search on metacpan

lib/Games/Axmud/Client.pm  view on Meta::CPAN

            # Hash in the form
            #   $pluginCageEditWinHash{cage_name} = config_window_package_name
            # NB If no 'edit' window exists for a particular cage, 'edit_window_package_name' will
            #   be 'undef'
            pluginCageEditWinHash       => {},
            # Registry hash of functions to call every time a menu strip object (GA::Strip::MenuBar)
            #   creates a menu in an 'internal' window, in order to add menu menu items for the
            #   plugin. Hash in the form
            #   $pluginMenuFuncHash{plugin_name} = func_ref
            #   ...where 'func_ref' is a reference to a function within a plugin that creates menu
            #   items, when passed an existing Gtk3::Menu widget
            pluginMenuFuncHash          => {},
            # For MXP file filters that must be passed to a plugin, a registry hash of the plugin
            #   functions to call when the filter is applied to a file. Hash in the form
            #   $pluginMxpFilterHash{package_name} = reference_to_function
            pluginMxpFilterHash         => {},

lib/Games/Axmud/Client.pm  view on Meta::CPAN

            #   close a tab by clicking on its 'X' widget, and the session is connected to a world
            confirmCloseTabFlag         => TRUE,        # [config]
            # Equivalent flag set to TRUE if the user should be prompted for a confirmation if they
            #   try to stop the session by clicking the main window menu, and the session is
            #   connected to a world
            confirmCloseMenuFlag  => TRUE,              # [config]
            # Equivalent flag set to TRUE if the user should be prompted for a confirmation if they
            #   try to stop the session by clicking the main window toolbutton, and the session is
            #   connected to a world
            confirmCloseToolButtonFlag  => TRUE,        # [config]

lib/Games/Axmud/Client.pm  view on Meta::CPAN

            # The constant registry of strip objects (these values never change). A hash in the form
            #   $constStripHash{package_name} = pretty_name
            # NB Both 'package_name' and 'pretty_name' should be unique. To avoid problems, use the
            #   plugin name in 'pretty_name', e.g. 'Myplugin toolbar'
            constStripHash              => {
                'Games::Axmud::Strip::MenuBar'
                                        => $axmud::SCRIPT . ' menu bar',
                'Games::Axmud::Strip::Toolbar'
                                        => $axmud::SCRIPT . ' toolbar',
                'Games::Axmud::Strip::Table'
                                        => $axmud::SCRIPT . ' table',

lib/Games/Axmud/Client.pm  view on Meta::CPAN

    sub stop {

        # Called by axmud.pl on shutdown
        # Also called by $self->stopSession, GA::Cmd::StopClient->do, GA::Cmd::Panic->do,
        #   GA::Cmd::RestoreWorld->do, GA::Win::Internal->setDeleteEvent and
        #   GA::Strip::MenuBar->drawWorldColumn
        # Stops the client
        #
        # Expected arguments
        #   (none besides $self)
        #

lib/Games/Axmud/Client.pm  view on Meta::CPAN

        return @returnArray;
    }

    sub checkSessions {

        # Called by GA::Strip::MenuBar->drawWorldColumn just before doing the ';stopsession' or
        #   ';stopclient' commands
        # Checks every session to see whether any of them are connected, and whether there are any
        #   unsaved files at all (if not, the 'main' window doesn't have to prompt the user for
        #   confirmation, before stopping the session/client).
        #

lib/Games/Axmud/Client.pm  view on Meta::CPAN


        # Operation complete
        return $count;
    }

    sub addPluginMenus {

        # Called by any Axmud plugin
        # Adds menu items defined in the plugin to any menu strip object (GA::Strip::MenuBar)
        #   displayed in any 'internal' window while the client is running (and the plugin is
        #   enabled)
        #
        # Expected arguments
        #   $plugin     - The plugin's main package (declared in the file header)
        #
        # Optional arguments
        #   $funcRef    - Reference to a function which contain the code to add menu items to a
        #                   Gtk3::Menu widget, pre-existing or created by this function. The
        #                   referenced function must accept the strip object and Gtk3::Menu as
        #                   arguments, and return 'undef' on failure or 1 on success
        #
        # Return values
        #   'undef' on improper arguments or if the menu items can't be added
        #   1 otherwise

        my ($self, $plugin, $funcRef, $check) = @_;

        # Local variables
        my ($pluginObj, $subMenu);

        # Check for improper arguments
        if (! defined $plugin || ! defined $funcRef || defined $check) {

             return $axmud::CLIENT->writeImproper($self->_objClass . '->addPluginWidgets', @_);

lib/Games/Axmud/Client.pm  view on Meta::CPAN

            #   checking anyway
            return undef;
        }

        # Each plugin can only call this function once
        if ($self->ivExists('pluginMenuFuncHash', $plugin)) {

            return undef;

        } else {

            $self->ivAdd('pluginMenuFuncHash', $plugin, $funcRef);
        }

        # Any 'internal' windows which already exist and which have a menu strip object should add a
        #   sub-menu for this plugin now; any new 'internal' windows created from now will
        #   automatically call the referenced function to add their own sub-menus
        foreach my $winObj ($self->desktopObj->ivValues('gridWinHash')) {

            my ($stripObj, $subMenu);

            if (
                $winObj->winType eq 'main'
                || $winObj->winType eq 'protocol'
                || $winObj->winType eq 'custom'
            ) {
                $stripObj = $winObj->ivShow('firstStripHash', 'Games::Axmud::Strip::MenuBar');
                if ($stripObj) {

                    $subMenu = $stripObj->addPluginWidgets($plugin);
                    if (! $subMenu) {

                        return undef;
                    }

                    # Call the referenced function to add menu items to this sub-menu
                    if (! &$funcRef($stripObj, $subMenu)) {

                        return undef;
                    }

                    # Update the window to show the new menu items
                    $winObj->winShowAll($self->_objClass . '->addPluginMenus');
                }
            }
        }

        return 1;

lib/Games/Axmud/Client.pm  view on Meta::CPAN

        }
    }

    sub openURL {

        # Called by GA::Strip::MenuBar->drawHelpColumn, GA::Obj::TextView->setButtonPressEvent,
        #   GA::OtherWin::Connect->createTableWidgets or any other function
        # Opens a URL link in an external web browser (if allowed)
        #
        # Expected arguments
        #   $link   - The URL to open

lib/Games/Axmud/Client.pm  view on Meta::CPAN

        } elsif ($type eq 'switch_offline') {
            $iv = 'offlineOnDisconnectFlag';
        } elsif ($type eq 'close_menu') {
            $iv = 'confirmCloseToolButtonFlag';
        } elsif ($type eq 'close_toolbutton') {
            $iv = 'confirmCloseMenuFlag';
        }

        if ($self->$iv) {
            $self->ivPoke($iv, FALSE);
        } else {

lib/Games/Axmud/Client.pm  view on Meta::CPAN

        { my $self = shift; return %{$self->{pluginCageHash}}; }
    sub pluginCagePackageHash
        { my $self = shift; return %{$self->{pluginCagePackageHash}}; }
    sub pluginCageEditWinHash
        { my $self = shift; return %{$self->{pluginCageEditWinHash}}; }
    sub pluginMenuFuncHash
        { my $self = shift; return %{$self->{pluginMenuFuncHash}}; }
    sub pluginMxpFilterHash
        { my $self = shift; return %{$self->{pluginMxpFilterHash}}; }

    sub clientTime
        { $_[0]->{clientTime} }

lib/Games/Axmud/Client.pm  view on Meta::CPAN

        { $_[0]->{simpleTabFlag} }
    sub confirmCloseMainWinFlag
        { $_[0]->{confirmCloseMainWinFlag} }
    sub confirmCloseTabFlag
        { $_[0]->{confirmCloseTabFlag} }
    sub confirmCloseMenuFlag
        { $_[0]->{confirmCloseMenuFlag} }
    sub confirmCloseToolButtonFlag
        { $_[0]->{confirmCloseToolButtonFlag} }

    sub constCharSet
        { $_[0]->{constCharSet} }

 view all matches for this distribution


Games-FrozenBubble

 view release on metacpan or  search on metacpan

share/locale/fr.po  view on Meta::CPAN

msgid "button"
msgstr "bouton"

#: ../frozen-bubble:3451
msgid "Start 1-player game menu"
msgstr "Menu de démarrage 1 joueur"

#: ../frozen-bubble:3502 ../frozen-bubble:3509 ../frozen-bubble:5117
msgid "Enable chain-reaction?"
msgstr "Activer la réaction en chaîne ?"

share/locale/fr.po  view on Meta::CPAN

"*** Impossible de se connecter au serveur demandé, retour à la demande "
"auprès du serveur maître"

#: ../frozen-bubble:5117
msgid "2-player game"
msgstr "Menu de démarrage 2 joueurs"

#: ../frozen-bubble:5166 ../frozen-bubble:5199
msgid "Congratulations!"
msgstr "Félicitations !"

 view all matches for this distribution


Games-Minesweeper

 view release on metacpan or  search on metacpan

lib/Games/Minesweeper.pm  view on Meta::CPAN


use strict;
use SDL ();
use SDL::Mixer ();
use Gtk2 ();
use Gtk2::SimpleMenu ();
use AnyEvent ();
use File::HomeDir ();

use Data::Dumper;

lib/Games/Minesweeper.pm  view on Meta::CPAN

                               }
                 ],
           },
         ]; 

      $menu = new Gtk2::SimpleMenu (menu_tree => $menu_tree,
                                );
      $l = new Gtk2::Label ('0000 ');
      $mc = new Gtk2::Label (' 000');
      $smiley->signal_connect (clicked => sub { restart; });
      $d->set_events ([ 'button_release_mask', 'button_press_mask', ]); #'pointer_motion_mask' ]);

 view all matches for this distribution


Games-Pandemic

 view release on metacpan or  search on metacpan

lib/Games/Pandemic/Tk/Main.pm  view on Meta::CPAN

    # no tear-off menus
    $mw->optionAdd('*tearOff', 'false');

    #$h->{w}{mnu_run} = $menubar->entrycget(1, '-menu');

    my $menubar = $mw->Menu;
    $mw->configure(-menu => $menubar );
    $self->_set_w('menubar', $menubar);

    # menu game
    my @mnu_game = (

 view all matches for this distribution


Games-PangZero

 view release on metacpan or  search on metacpan

lib/Games/PangZero.pm  view on Meta::CPAN

* P4 Even more forgiving collision detection (?)
* P4 Smooth numbers in the scoreboard
* P3 RotoZoomer smooth parameter to eliminate warning..
* P3 Set DataDir with command line parameter.
* P2 Roll your own game
* P4 Reorg menu: MenuItem->Update(), MenuItem->Left(), MenuItem->Right(), ...

Next release:
* Sound effect for matrix effect...
* Handle possible HST corruption if game exits while merging scores

lib/Games/PangZero.pm  view on Meta::CPAN

use Carp;

# SDL objects

use vars qw (
  $App $VERSION $RotoZoomer $Background $ScoreFont $MenuFont $GlossyFont
  %BallSurfaces
  $BorderSurface $WhiteBorderSurface $RedBorderSurface $BonusSurface $LevelIndicatorSurface $LevelIndicatorSurface2
  $WhiteHarpoonSurface
  %Sounds $Mixer
);

lib/Games/PangZero.pm  view on Meta::CPAN

  @DifficultyLevels $DifficultyLevelIndex $DifficultyLevel
  @WeaponDurations $WeaponDuration $WeaponDurationIndex
  @GameObjects %GameEvents $GameSpeed $GamePause $Game
  @Players @GuyImageFiles @GuyColors $NumGuys
  @BallDesc %BallDesc @ChallengeLevels @PanicLevels
  $UnicodeMode $LastUnicodeKey %Keys %Events %MenuEvents );


use Games::PangZero::Globals;
use Games::PangZero::GameObject;
use Games::PangZero::Ball;

lib/Games/PangZero.pm  view on Meta::CPAN

use Games::PangZero::Hexa;
use Games::PangZero::Highscore;
use Games::PangZero::Joystick;
use Games::PangZero::MachineGun;
use Games::PangZero::Meltdown;
use Games::PangZero::Menu;
use Games::PangZero::MenuItem;
use Games::PangZero::Music;
use Games::PangZero::Palette;
use Games::PangZero::Pop;
use Games::PangZero::PowerWire;
use Games::PangZero::SeekerBall;

lib/Games/PangZero.pm  view on Meta::CPAN

      } elsif ($keypressed == SDLK_p and not $UnicodeMode) {
        Pause();
      } else {
        $Keys{$keypressed}   = 1;
        $Events{$keypressed} = 1;
        $MenuEvents{UP}      = 1 if $keypressed == SDLK_UP();
        $MenuEvents{DOWN}    = 1 if $keypressed == SDLK_DOWN();
        $MenuEvents{LEFT}    = 1 if $keypressed == SDLK_LEFT();
        $MenuEvents{RIGHT}   = 1 if $keypressed == SDLK_RIGHT();
        $MenuEvents{BUTTON}  = 1 if $keypressed == SDLK_RETURN();
        $LastUnicodeKey      = $event->key_unicode() if $UnicodeMode;
      }
    }
    elsif ($type == SDL_KEYUP) {
      my $keypressed     = $event->key_sym;

lib/Games/PangZero.pm  view on Meta::CPAN

  }

  Games::PangZero::Joystick::ReadJoystick($readBothJoystickAxes);
}

sub DoMenu {
  my $oldScreenHeight = $ScreenHeight;
  my $oldScreenWidth  = $ScreenWidth;
  $ScreenWidth        = $PhysicalScreenWidth - $ScreenMargin * 2;
  $ScreenWidth        = int($ScreenWidth / 32) * 32;
  $Game               = Games::PangZero::Menu->new();
  my $retval          = $Game->Run();
  Games::PangZero::Config::SaveConfig();

  $ScreenWidth        = $oldScreenWidth;
  $ScreenHeight       = $oldScreenHeight;

lib/Games/PangZero.pm  view on Meta::CPAN

  SDL::Mouse::show_cursor(0);

  $Background = SDL::Surface->new( Games::PangZero::Config::IsMicrosoftWindows() ? SDL_SWSURFACE() : SDL_HWSURFACE(), $App->w, $App->h, 16);
  $Background = SDL::Video::display_format($Background);
  $ScoreFont  = SDLx::SFont->new("$DataDir/brandybun3.png");
  $MenuFont   = SDLx::SFont->new("$DataDir/font2.png");
  $GlossyFont = SDLx::SFont->new("$DataDir/glossyfont.png");

  Games::PangZero::Graphics::LoadSurfaces();
  Games::PangZero::Music::LoadSounds();
  Games::PangZero::Joystick::InitJoystick();
}

sub MainLoop {
  my $menuResult = DoMenu();
  if ($menuResult eq 'demo') {
    DoDemo();
  }

  #$Game = Games::PangZero::DemoRecordGame->new();

lib/Games/PangZero.pm  view on Meta::CPAN

                                ? Games::PangZero::ChallengeGame->new()
                                : Games::PangZero::PanicGame->new();
  @Games::PangZero::Highscore::UnsavedHighScores = ();
  $Game->Run();

  bless $Game, 'Menu';
  $Game->{abortgame} = 0;
  {
    my @gameObjects = @GameObjects;
    foreach (@gameObjects) {
      $_->Delete() if ref $_ eq 'Games::PangZero::Guy';
    }
  }

  SDL::Video::blit_surface($Background, SDL::Rect->new(0, 0, $App->w, $App->h), $App, SDL::Rect->new(0, 0, $App->w, $App->h));
  $Games::PangZero::MenuFont->use();
  Games::PangZero::Highscore::MergeUnsavedHighScores($menuResult eq 'challenge' ? 'Cha' : 'Pan');

  return;

  my ($filename, $i) = ('', 1);

 view all matches for this distribution


Games-RailRoad

 view release on metacpan or  search on metacpan

lib/Games/RailRoad.pm  view on Meta::CPAN

#                -image       => $poe_main_window->Photo('calbell16'),
#                ],
#            ],
#        ],
#    ];
#    my $menubar = $poe_main_window->Menu( -menuitems => $menuitems );
#    $poe_main_window->configure( -menu => $menubar );
#    $h->{w}{mnu_run} = $menubar->entrycget(1, '-menu');

    # toolbar
    my @tb = (

 view all matches for this distribution


Games-Risk

 view release on metacpan or  search on metacpan

lib/Games/Risk/GUI/Startup.pm  view on Meta::CPAN


    my ($num) = @$args;
    my $top = $h->{toplevel};

    # creating popup window
    my $tc =$top->Menu;
    $tc->overrideredirect(1);  # no window decoration
    foreach my $i ( 0..$#COLORS ) {
        my $color = $COLORS[$i];
        my $row = $i < 5 ? 0 : 1;
        my $col = $i % 5;

 view all matches for this distribution


( run in 1.265 second using v1.01-cache-2.11-cpan-c66228cdda8 )