\\[\\[([^|\\]]*)\\|\\s*)(.*?)\\s*\\]\\]($SuffixPattern)/i",
"PopupWindow");
function PopupWindow ($m) {
global $LinkPopupFmt, $FmtPV, $PopupLinkPage;
$opts=$m[1];
$tgt=$m[2];
$lbl=$m[3];
$sfx=$m[4];
extract($GLOBALS['MarkupToHTML']);
static $cnt = 0; $cnt++;
$defaults = array(
'id' => '0',
'width' => 500,
'height' => 300,
'left' => 'center',
'top' => 'center',
'resizable' => 1,
'scrollbars' => 1,
'toolbar' => 0,
'location' => 0,
'directories' => 0,
'statusbar' => 0,
'menubar' => 0,
);
$opt = array_merge($defaults, ParseArgs($opts));
$FmtV['$PopupLinkPage'] = $PopupLinkPage = $pagename;
$FmtPV['$PopupLinkPage'] = '$GLOBALS["PopupLinkPage"]';
$LinkPopupFmt = "\$LinkText".
($cnt==1 ? "\n " : "");
return Keep(MakeLink($pagename,$tgt,$lbl,$sfx,$GLOBALS['LinkPopupFmt']),'L');
}
# set PV {$PopOpen} with action=popopen
$HandleActions['popopen'] = 'PopOpenHandle';
function PopOpenHandle($pagename) {
global $FmtPV;
$FmtPV['$PopOpen'] = '"1"';
HandleBrowse($pagename);
}
# create link for closing popup with (:popclose Close Window:)
Markup('popclose','directives','/\\(:popclose\\s*(.*?):\\)/i',
"PopCloseMarkup");
function PopCloseMarkup($pagename, $label='Close Window') {
if(strlen($m[1] < 1)){
$label='Close Window';
}else{
$label=$m[1];
}
extract($GLOBALS['MarkupToHTML']);
$out = "$label";
return Keep($out);
}
# add markup (:input closewindow 'Close Window':)
SDVA($InputTags['closewindow'], array(
':args' => array('value'),
'value' => XL('Close Window'),
':html' => "",
));