loncom/interface/lonmenu.pm - diff

Return to lonmenu.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.525, 2022/07/01 03:14:31	version 1.526, 2022/07/07 15:28:08
Line 3226 sub linkprot_exit {	Line 3226 sub linkprot_exit {
exit => 'Cancel',	exit => 'Cancel',
);	);
if ($exit) {	if ($exit) {
my $height = 250;	my ($show,$text) = split(/:/,$exit);
my $width = 300;	unless ($show eq 'no') {
my $exitbuttontext = &mt('Exit Tool');	my $height = 250;
return <<END;	my $width = 300;
	my $exitbuttontext;
	if ($text eq '') {
	$exitbuttontext = &mt('Exit Tool');
	} else {
	$exitbuttontext = $text;
	}
	return <<END;
<form method="post" name="LCexitButton" action="/adm/linkexit">	<form method="post" name="LCexitButton" action="/adm/linkexit">
<input type="hidden" name="LC_deeplink_exit" value="" />	<input type="hidden" name="LC_deeplink_exit" value="" />
<button id="LC_exit-confirm-opener" type="button">$exitbuttontext</button>	<button id="LC_exit-confirm-opener" type="button">$exitbuttontext</button>
Line 3271 sub linkprot_exit {	Line 3278 sub linkprot_exit {
</script>	</script>

END	END
	}
}	}
}	}
}	}