';
foreach ($table->head as $key => $heading) {
if (!isset($size[$key])) {
$size[$key] = '';
}
if (!isset($align[$key])) {
$align[$key] = '';
}
echo '
'. $heading .'
';
}
echo '
'."\n";
}
if (!empty($table->data)) {
foreach ($table->data as $row) {
echo '
';
if ($row == 'hr' and $countcols) {
echo '
';
} else { /// it's a normal row of data
foreach ($row as $key => $item) {
if (!isset($size[$key])) {
$size[$key] = '';
}
if (!isset($align[$key])) {
$align[$key] = '';
}
if (!isset($wrap[$key])) {
$wrap[$key] = '';
}
echo '
'. $item .'
';
}
}
echo '
'."\n";
}
}
echo '
'."\n";
print_simple_box_end();
return true;
}
/**
* Creates a nicely formatted table and returns it.
*
* @param array $table is an object with several properties.
* $table->head - An array of heading names.
*
$table->align - An array of column alignments
*
$table->size - An array of column sizes
*
$table->wrap - An array of "nowrap"s or nothing
*
$table->data[] - An array of arrays containing the data.
*
$table->class - A css class name
*
$table->fontsize - Is the size of all the text
*
$table->tablealign - Align the whole table
*
$table->width - A percentage of the page
*
$table->cellpadding - Padding on each cell
*
$table->cellspacing - Spacing between cells
*
* @return string
* @todo Finish documenting this function
*/
function make_table($table) {
if (isset($table->align)) {
foreach ($table->align as $key => $aa) {
if ($aa) {
$align[$key] = ' align="'. $aa .'"';
} else {
$align[$key] = '';
}
}
}
if (isset($table->size)) {
foreach ($table->size as $key => $ss) {
if ($ss) {
$size[$key] = ' width="'. $ss .'"';
} else {
$size[$key] = '';
}
}
}
if (isset($table->wrap)) {
foreach ($table->wrap as $key => $ww) {
if ($ww) {
$wrap[$key] = ' nowrap="nowrap" ';
} else {
$wrap[$key] = '';
}
}
}
if (empty($table->width)) {
$table->width = '80%';
}
if (empty($table->tablealign)) {
$table->tablealign = 'center';
}
if (empty($table->cellpadding)) {
$table->cellpadding = '5';
}
if (empty($table->cellspacing)) {
$table->cellspacing = '1';
}
if (empty($table->class)) {
$table->class = 'generaltable';
}
if (empty($table->fontsize)) {
$fontsize = '';
} else {
$fontsize = '';
}
$output = '
';
foreach ($table->head as $key => $heading) {
if (!isset($size[$key])) {
$size[$key] = '';
}
if (!isset($align[$key])) {
$align[$key] = '';
}
$output .= '
'.$fontsize.$heading.'
';
}
$output .= '
'."\n";
}
foreach ($table->data as $row) {
$output .= '
';
foreach ($row as $key => $item) {
if (!isset($size[$key])) {
$size[$key] = '';
}
if (!isset($align[$key])) {
$align[$key] = '';
}
if (!isset($wrap[$key])) {
$wrap[$key] = '';
}
$output .= '
'. $fontsize . $item .'
';
}
$output .= '
'."\n";
}
$output .= '
'."\n";
return $output;
}
/**
* Prints a basic textarea field.
*
* @uses $CFG
* @param boolean $usehtmleditor ?
* @param int $rows ?
* @param int $cols ?
* @param null $width Legacy field no longer used!
* @param null $height Legacy field no longer used!
* @param string $name ?
* @param string $value ?
* @param int $courseid ?
* @todo Finish documenting this function
*/
function print_textarea($usehtmleditor, $rows, $cols, $width, $height, $name, $value='', $courseid=0) {
/// $width and height are legacy fields and no longer used
global $CFG, $course;
if (empty($courseid)) {
if (!empty($course->id)) { // search for it in global context
$courseid = $course->id;
}
}
if ($usehtmleditor) {
if (!empty($courseid) and isteacher($courseid)) {
echo ''."\n";
} else {
echo ''."\n";
}
echo ''."\n";
echo ''."\n";
echo ''."\n";
if ($rows < 10) {
$rows = 10;
}
if ($cols < 65) {
$cols = 65;
}
}
echo ''."\n";
}
/**
* Legacy function, provided for backward compatability.
* This method now simply calls {@link use_html_editor()}
*
* @deprecated Use {@link use_html_editor()} instead.
* @param string $name Form element to replace with HTMl editor by name
* @todo Finish documenting this function
*/
function print_richedit_javascript($form, $name, $source='no') {
use_html_editor($name);
}
/**
* Sets up the HTML editor on textareas in the current page.
* If a field name is provided, then it will only be
* applied to that field - otherwise it will be used
* on every textarea in the page.
*
* In most cases no arguments need to be supplied
*
* @param string $name Form element to replace with HTMl editor by name
*/
function use_html_editor($name='') {
echo ''."\n";
}
/**
* Returns a turn edit on/off button for course in a self contained form.
* Used to be an icon, but it's now a simple form button
*
* @uses $CFG
* @uses $USER
* @param int $courseid The course to update by id as found in 'course' table
* @return string
*/
function update_course_icon($courseid) {
global $CFG, $USER;
if (isteacheredit($courseid)) {
if (!empty($USER->editing)) {
$string = get_string('turneditingoff');
$edit = 'off';
} else {
$string = get_string('turneditingon');
$edit = 'on';
}
return "";
}
}
/**
* Prints the editing button on a module "view" page
*
* @uses $CFG
* @param type description
* @todo Finish documenting this function
*/
function update_module_button($moduleid, $courseid, $string) {
global $CFG;
if (isteacheredit($courseid)) {
$string = get_string('updatethis', '', $string);
return "";
} else {
return '';
}
}
/**
* Prints the editing button on a category page
*
* @uses $CFG
* @uses $USER
* @param int $categoryid ?
* @return string
* @todo Finish documenting this function
*/
function update_category_button($categoryid) {
global $CFG, $USER;
if (iscreator()) {
if (!empty($USER->categoryediting)) {
$string = get_string('turneditingoff');
$edit = 'off';
} else {
$string = get_string('turneditingon');
$edit = 'on';
}
return "";
}
}
/**
* Prints the editing button on categories listing
*
* @uses $CFG
* @uses $USER
* @return string
*/
function update_categories_button() {
global $CFG, $USER;
if (isadmin()) {
if (!empty($USER->categoriesediting)) {
$string = get_string('turneditingoff');
$edit = 'off';
} else {
$string = get_string('turneditingon');
$edit = 'on';
}
return "';
}
}
/**
* Prints the editing button on group page
*
* @uses $CFG
* @uses $USER
* @param int $courseid The course group is associated with
* @param int $groupid The group to update
* @return string
*/
function update_group_button($courseid, $groupid) {
global $CFG, $USER;
if (isteacheredit($courseid)) {
$string = get_string('editgroupprofile');
return "';
}
}
/**
* Prints the editing button on groups page
*
* @uses $CFG
* @uses $USER
* @param int $courseid The id of the course to be edited
* @return string
* @todo Finish documenting this function
*/
function update_groups_button($courseid) {
global $CFG, $USER;
if (isteacheredit($courseid)) {
if (!empty($USER->groupsediting)) {
$string = get_string('turneditingoff');
$edit = 'off';
} else {
$string = get_string('turneditingon');
$edit = 'on';
}
return "";
}
}
/**
* Prints an appropriate group selection menu
*
* @uses VISIBLEGROUPS
* @param array $groups ?
* @param int $groupmode ?
* @param string $currentgroup ?
* @param string $urlroot ?
* @todo Finish documenting this function
*/
function print_group_menu($groups, $groupmode, $currentgroup, $urlroot) {
/// Add an "All groups" to the start of the menu
$groupsmenu[0] = get_string('allparticipants');
foreach ($groups as $key => $groupname) {
$groupsmenu[$key] = $groupname;
}
echo '
';
}
/**
* Prints form items with the names $day, $month and $year
*
* @param int $day ?
* @param int $month ?
* @param int $year ?
* @param int $currenttime A default timestamp in GMT
* @todo Finish documenting this function
*/
function print_date_selector($day, $month, $year, $currenttime=0) {
if (!$currenttime) {
$currenttime = time();
}
$currentdate = usergetdate($currenttime);
for ($i=1; $i<=31; $i++) {
$days[$i] = $i;
}
for ($i=1; $i<=12; $i++) {
$months[$i] = userdate(gmmktime(12,0,0,$i,1,2000), "%B");
}
for ($i=2000; $i<=2010; $i++) {
$years[$i] = $i;
}
choose_from_menu($days, $day, $currentdate['mday'], '');
choose_from_menu($months, $month, $currentdate['mon'], '');
choose_from_menu($years, $year, $currentdate['year'], '');
}
/**
*Prints form items with the names $hour and $minute
*
* @param ? $hour ?
* @param ? $minute ?
* @param $currenttime A default timestamp in GMT
* @param int $step ?
* @todo Finish documenting this function
*/
function print_time_selector($hour, $minute, $currenttime=0, $step=5) {
if (!$currenttime) {
$currenttime = time();
}
$currentdate = usergetdate($currenttime);
if ($step != 1) {
$currentdate['minutes'] = ceil($currentdate['minutes']/$step)*$step;
}
for ($i=0; $i<=23; $i++) {
$hours[$i] = sprintf("%02d",$i);
}
for ($i=0; $i<=59; $i+=$step) {
$minutes[$i] = sprintf("%02d",$i);
}
choose_from_menu($hours, $hour, $currentdate['hours'], '');
choose_from_menu($minutes, $minute, $currentdate['minutes'], '');
}
/**
* Prints time limit value selector
*
* @uses $CFG
* @param int $timelimit ?
* @param string $unit ?
* @todo Finish documenting this function
*/
function print_timer_selector($timelimit = 0, $unit = '') {
global $CFG;
if ($unit) {
$unit = ' '.$unit;
}
// Max timelimit is sessiontimeout - 10 minutes.
$maxvalue = ($CFG->sessiontimeout / 60) - 10;
for ($i=1; $i<=$maxvalue; $i++) {
$minutes[$i] = $i.$unit;
}
choose_from_menu($minutes, 'timelimit', $timelimit, get_string('none'));
}
/**
* Prints a grade menu (as part of an existing form) with help
* Showing all possible numerical grades and scales
*
* @uses $CFG
* @param int $courseid ?
* @param string $name ?
* @param string $current ?
* @param boolean $includenograde ?
* @todo Finish documenting this function
*/
function print_grade_menu($courseid, $name, $current, $includenograde=true) {
global $CFG;
$strscale = get_string('scale');
$strscales = get_string('scales');
$scales = get_scales_menu($courseid);
foreach ($scales as $i => $scalename) {
$grades[-$i] = $strscale .': '. $scalename;
}
if ($includenograde) {
$grades[0] = get_string('nograde');
}
for ($i=100; $i>=1; $i--) {
$grades[$i] = $i;
}
choose_from_menu($grades, $name, $current, '');
$helpicon = $CFG->pixpath .'/help.gif';
$linkobject = "";
link_to_popup_window ('/course/scales.php?id='. $courseid .'&list=true', 'ratingscales',
$linkobject, 400, 500, $strscales);
}
/**
* Prints a scale menu (as part of an existing form) including help button
* Just like {@link print_grade_menu()} but without the numeric grades
*
* @param int $courseid ?
* @param string $name ?
* @param string $current ?
* @todo Finish documenting this function
*/
function print_scale_menu($courseid, $name, $current) {
global $CFG;
$strscales = get_string('scales');
choose_from_menu(get_scales_menu($courseid), $name, $current, '');
$helpicon = $CFG->pixpath .'/help.gif';
$linkobject = '';
link_to_popup_window ('/course/scales.php?id='. $courseid .'&list=true', 'ratingscales',
$linkobject, 400, 500, $strscales);
}
/**
* Prints a help button about a scale
*
* @uses $CFG
* @param id $courseid ?
* @param object $scale ?
* @todo Finish documenting this function
*/
function print_scale_menu_helpbutton($courseid, $scale) {
global $CFG;
$strscales = get_string('scales');
$helpicon = $CFG->pixpath .'/help.gif';
$linkobject = "name\" src=\"$helpicon\" />";
link_to_popup_window ('/course/scales.php?id='. $courseid .'&list=true&scale='. $scale->id, 'ratingscale',
$linkobject, 400, 500, $scale->name);
}
/**
* Print an error page displaying an error message.
*
* @uses $SESSION
* @uses $CFG
* @param string $message The message to display to the user about the error.
* @param string $link The url where the user will be prompted to continue. If no url is provided the user will be directed to the site index page.
*/
function error ($message, $link='') {
global $CFG, $SESSION;
print_header(get_string('error'));
echo ' ';
$message = clean_text($message); // In case nasties are in here
print_simple_box($message, 'center', '', '#FFBBBB');
if (!$link) {
if ( !empty($SESSION->fromurl) ) {
$link = $SESSION->fromurl;
unset($SESSION->fromurl);
} else {
$link = $CFG->wwwroot .'/';
}
}
print_continue($link);
print_footer();
die;
}
/**
* Print a help button.
*
* @uses $CFG
* @uses $THEME
* @param string $page The keyword that defines a help page
* @param string $title The title of links, rollover tips, alt tags etc
* @param string $module Which module is the page defined in
* @param mixed $image Use a help image for the link? (true/false/"both")
* @param string $text If defined then this text is used in the page, and
* the $page variable is ignored.
* @param boolean $return If true then the output is returned as a string, if false it is printed to the current page.
* @return string
* @todo Finish documenting this function
*/
function helpbutton ($page, $title='', $module='moodle', $image=true, $linktext=false, $text='', $return=false) {
global $CFG, $THEME;
if ($module == '') {
$module = 'moodle';
}
if ($image) {
$icon = $CFG->pixpath .'/help.gif';
if ($linktext) {
$linkobject = "$title";
} else {
$linkobject = "";
}
} else {
$linkobject = ''. $title .'';
}
if ($text) {
$url = '/help.php?module='. $module .'&text='. htmlentities(urlencode($text));
} else {
$url = '/help.php?module='. $module .'&file='. $page .'.html';
}
$link = link_to_popup_window ($url, 'popup', $linkobject, 400, 500, $title, 'none', true);
if ($return) {
return $link;
} else {
echo $link;
}
}
/**
* Print a help button.
*
* Prints a special help button that is a link to the "live" emoticon popup
* @uses $CFG
* @uses $SESSION
* @param string $form ?
* @param string $field ?
* @todo Finish documenting this function
*/
function emoticonhelpbutton($form, $field) {
global $CFG, $SESSION;
$SESSION->inserttextform = $form;
$SESSION->inserttextfield = $field;
helpbutton('emoticons', get_string('helpemoticons'), 'moodle', false, true);
echo ' ';
link_to_popup_window ('/help.php?module=moodle&file=emoticons.html', 'popup',
'',
400, 500, get_string('helpemoticons'));
echo ' ';
}
/**
* Print a message and exit.
*
* @uses $CFG
* @uses $THEME
* @param string $message ?
* @param string $link ?
* @todo Finish documenting this function
*/
function notice ($message, $link='') {
global $CFG, $THEME;
$message = clean_text($message);
$link = clean_text($link);
if (!$link) {
if (!empty($_SERVER['HTTP_REFERER'])) {
$link = $_SERVER['HTTP_REFERER'];
} else {
$link = $CFG->wwwroot .'/';
}
}
echo ' ';
print_simple_box($message, 'center', '50%', $THEME->cellheading, '20', 'noticebox');
print_heading(''. get_string('continue') .'');
print_footer(get_site());
die;
}
/**
* Print a message along with "Yes" and "No" links for the user to continue.
*
* @uses $THEME
* @param string $message The text to display
* @param string $linkyes The link to take the user to if they choose "Yes"
* @param string $linkno The link to take the user to if they choose "No"
*/
function notice_yesno ($message, $linkyes, $linkno) {
global $THEME;
$message = clean_text($message);
$linkyes = clean_text($linkyes);
$linkno = clean_text($linkno);
print_simple_box_start('center', '60%', $THEME->cellheading);
echo '
';
print_simple_box_end();
}
/**
* Redirects the user to another page, after printing a notice
*
* @param string $url The url to take the user to
* @param string $message The text message to display to the user about the redirect, if any
* @param string $delay How long before refreshing to the new page at $url?
* @todo '&' needs to be encoded into '&' for XHTML compliance,
* however, this is not true for javascript. Therefore we
* first decode all entities in $url (since we cannot rely on)
* the correct input) and then encode for where it's needed
* echo "";
*/
function redirect($url, $message='', $delay='0') {
$url = clean_text($url);
$message = clean_text($message);
$url = html_entity_decode($url); // for php < 4.3.0 this is defined in moodlelib.php
$encodedurl = htmlentities($url);
if (empty($message)) {
echo '';
echo ''; // To cope with Mozilla bug
} else {
if (empty($delay)) {
$delay = 3; // There's no point having a message with no delay
}
print_header('', '', '', '', '');
echo '
';
flush();
sleep($delay);
echo ''; // To cope with Mozilla bug
}
die;
}
/**
* Print a bold message in an optional color.
*
* @param string $message The message to print out
* @param string $color Optional color to display message text in
* @param string $align Paragraph alignment option
*/
function notify ($message, $color='red', $align='center') {
$message = clean_text($message);
echo '
'. $message .'
' . "\n";
}
/**
* Given an email address, this function will return an obfuscated version of it
*
* @param string $email The email address to obfuscate
* @return string
*/
function obfuscate_email($email) {
$i = 0;
$length = strlen($email);
$obfuscated = '';
while ($i < $length) {
if (rand(0,2)) {
$obfuscated.='%'.dechex(ord($email{$i}));
} else {
$obfuscated.=$email{$i};
}
$i++;
}
return $obfuscated;
}
/**
* This function takes some text and replaces about half of the characters
* with HTML entity equivalents. Return string is obviously longer.
*
* @param string $plaintext The text to be obfuscated
* @return string
*/
function obfuscate_text($plaintext) {
$i=0;
$length = strlen($plaintext);
$obfuscated='';
$prev_obfuscated = false;
while ($i < $length) {
$c = ord($plaintext{$i});
$numerical = ($c >= ord('0')) && ($c <= ord('9'));
if ($prev_obfuscated and $numerical ) {
$obfuscated.='&#'.ord($plaintext{$i}).';';
} else if (rand(0,2)) {
$obfuscated.='&#'.ord($plaintext{$i}).';';
$prev_obfuscated = true;
} else {
$obfuscated.=$plaintext{$i};
$prev_obfuscated = false;
}
$i++;
}
return $obfuscated;
}
/**
* This function uses the {@link obfuscate_email()} and {@link obfuscate_text()}
* to generate a fully obfuscated email link, ready to use.
*
* @param string $email The email address to display
* @param string $label The text to dispalyed as hyperlink to $email
* @param boolean $dimmed If true then use css class 'dimmed' for hyperlink
* @return string
*/
function obfuscate_mailto($email, $label='', $dimmed=false) {
if (empty($label)) {
$label = $email;
}
if ($dimmed) {
$title = get_string('emaildisable');
$dimmed = ' class="dimmed"';
} else {
$title = '';
$dimmed = '';
}
return sprintf("%s",
obfuscate_text('mailto'), obfuscate_email($email),
obfuscate_text($label));
}
/**
* Prints a single paging bar to provide access to other pages (usually in a search)
*
* @param int $totalcount ?
* @param int $page ?
* @param int $perpage ?
* @param string $baseurl ?
* @todo Finish documenting this function
*/
function print_paging_bar($totalcount, $page, $perpage, $baseurl) {
$maxdisplay = 18;
if ($totalcount > $perpage) {
echo '
';
}
}
/**
* This function is used to rebuild the tag because some formats (PLAIN and WIKI)
* will transform it to html entities
*
* @param string $text Text to search for nolink tag in
* @return string
*/
function rebuildnolinktag($text) {
$text = preg_replace('/<(\/*nolink)>/i','<$1>',$text);
return $text;
}
// ================================================
// THREE FUNCTIONS MOVED HERE FROM course/lib.php
// ================================================
/**
* Prints a nice side block with an optional header. The content can either
* be a block of HTML or a list of text with optional icons.
*
* @uses $THEME
* @param string $heading ?
* @param string $content ?
* @param array $list ?
* @param array $icons ?
* @param string $footer ?
* @param array $attributes ?
* @todo Finish documenting this function. Show example of various attributes, etc.
*/
function print_side_block($heading='', $content='', $list=NULL, $icons=NULL, $footer='', $attributes = array()) {
global $THEME;
print_side_block_start($heading, $attributes);
if ($content) {
echo $content;
if ($footer) {
echo '
'. $footer .'
';
}
} else {
echo '
';
if ($list) {
foreach ($list as $key => $string) {
echo '
';
if ($icons) {
echo '
'. $icons[$key] .'
';
}
echo '
'. $string .'
';
echo '
';
}
}
if ($footer) {
echo '
';
echo '
';
echo '
'. $footer .'
';
echo '
';
}
echo '
';
}
print_side_block_end();
}
/**
* Starts a nice side block with an optional header.
*
* @uses $THEME
* @param string $heading ?
* @param array $attributes ?
* @todo Finish documenting this function
*/
function print_side_block_start($heading='', $attributes = array()) {
global $THEME;
// If there are no special attributes, give a default CSS class
if(empty($attributes) || !is_array($attributes)) {
$attributes = array('class' => 'sideblock');
}
else if(!isset($attributes['class'])) {
$attributes['class'] = 'sideblock';
}
else if(!strpos($attributes['class'], 'sideblock')) {
$attributes['class'] .= ' sideblock';
}
// OK, the class is surely there and in addition to anything
// else, it's tagged as a sideblock
$attrtext = '';
foreach($attributes as $attr => $val) {
$attrtext .= ' '.$attr.'="'.$val.'"';
}
// [pj] UGLY UGLY UGLY! I hate myself for doing this!
// When the Lord Moodle 2.0 cometh, his mercy shalt move all this mess
// to CSS and banish the evil to the abyss from whence it came.
echo '
';
if ($heading) {
echo '
'.$heading.'
';
}
echo '
';
}
/**
* Print table ending tags for a side block box.
*/
function print_side_block_end() {
echo '
';
echo "\n";
}
/**
* Prints out the HTML editor config.
*
* @uses $CFG
*/
function print_editor_config() {
global $CFG;
// print new config
echo 'var config = new HTMLArea.Config();'."\n";
echo "config.pageStyle = \"body {";
if(!(empty($CFG->editorbackgroundcolor))) {
echo " background-color: $CFG->editorbackgroundcolor;";
}
if(!(empty($CFG->editorfontfamily))) {
echo " font-family: $CFG->editorfontfamily;";
}
if(!(empty($CFG->editorfontsize))) {
echo " font-size: $CFG->editorfontsize;";
}
echo " }\";\n";
echo "config.killWordOnPaste = ";
echo(empty($CFG->editorkillword)) ? "false":"true";
echo ';'."\n";
echo 'config.fontname = {'."\n";
$fontlist = isset($CFG->editorfontlist) ? explode(';', $CFG->editorfontlist) : array();
$i = 1; // Counter is used to get rid of the last comma.
$count = count($fontlist); // Otherwise IE doesn't load the editor.
foreach($fontlist as $fontline) {
if(!empty($fontline)) {
list($fontkey, $fontvalue) = split(':', $fontline);
echo '"'. $fontkey ."\":\t'". $fontvalue ."'";
if($i < $count) {
echo ','."\n";
}
}
$i++;
}
echo '};';
if(!empty($CFG->editorspelling) && !empty($CFG->aspellpath)) {
print_speller_code($usehtmleditor=true);
}
}
/**
* Prints out code needed for spellchecking.
* Original idea by Ludo (Marc Alier).
*
* @uses $CFG
* @param boolean $usehtmleditor ?
* @todo Finish documenting this function
*/
function print_speller_code ($usehtmleditor=false) {
global $CFG;
if(!$usehtmleditor) {
echo "\n".''."\n";
} else {
echo "\nfunction spellClickHandler(editor, buttonId) {\n";
echo "\teditor._textArea.value = editor.getHTML();\n";
echo "\tvar speller = new spellChecker( editor._textArea );\n";
echo "\tspeller.popUpUrl = \"" . $CFG->wwwroot ."/lib/speller/spellchecker.html\";\n";
echo "\tspeller.spellCheckScript = \"". $CFG->wwwroot ."/lib/speller/server-scripts/spellchecker.php\";\n";
echo "\tspeller._moogle_edit=1;\n";
echo "\tspeller._editor=editor;\n";
echo "\tspeller.openChecker();\n";
echo '}'."\n";
}
}
/**
* Print button for spellchecking when editor is disabled
*/
function print_speller_button () {
echo ''."\n";
}
// vim:autoindent:expandtab:shiftwidth=4:tabstop=4:tw=140:
?>
pixpath/i/log.gif\" alt=\"\" />
"; link_to_popup_window ('/course/scales.php?id='. $courseid .'&list=true', 'ratingscales', $linkobject, 400, 500, $strscales); } /** * Prints a scale menu (as part of an existing form) including help button * Just like {@link print_grade_menu()} but without the numeric grades * * @param int $courseid ? * @param string $name ? * @param string $current ? * @todo Finish documenting this function */ function print_scale_menu($courseid, $name, $current) { global $CFG; $strscales = get_string('scales'); choose_from_menu(get_scales_menu($courseid), $name, $current, ''); $helpicon = $CFG->pixpath .'/help.gif'; $linkobject = '
'; link_to_popup_window ('/course/scales.php?id='. $courseid .'&list=true', 'ratingscales', $linkobject, 400, 500, $strscales); } /** * Prints a help button about a scale * * @uses $CFG * @param id $courseid ? * @param object $scale ? * @todo Finish documenting this function */ function print_scale_menu_helpbutton($courseid, $scale) { global $CFG; $strscales = get_string('scales'); $helpicon = $CFG->pixpath .'/help.gif'; $linkobject = "
"; } else { $linkobject = "
',
400, 500, get_string('helpemoticons'));
echo '