inst/DataMetProcess_Shiny/functions/JS.R

In DataMetProcess: Meteorological Data Processing

jscode <- "
shinyjs.disableTab = function(name) {
  var tab = $('.nav li a[data-value=' + name + ']');
  tab.bind('click.tab', function(e) {
    e.preventDefault();
    return false;
  });
  tab.addClass('disabled');
}

shinyjs.disableTabMenu = function(name) {
  var tab = $('.nav li a[data-value=' + name + ']');
  tab.bind('click.tab', function(e) {
    e.preventDefault();
    return false;
  });
  tab.addClass('disabledTabMenu');
}

shinyjs.disableSubMenu = function(name) {
  var tab = $('a[data-value=' + name + ']');
  tab.bind('click.tab', function(e) {
    e.preventDefault();
    return false;
  });
  tab.addClass('disabledSubMenu');
}

shinyjs.enableTab = function(name) {
  var tab = $('.nav li a[data-value=' + name + ']');
  tab.unbind('click.tab');
  tab.removeClass('disabled');
}

shinyjs.enableTabMenu = function(name) {
  var tab = $('.nav li a[data-value=' + name + ']');
  tab.unbind('click.tab');
  tab.removeClass('disabledTabMenu');
}

shinyjs.enableSubMenu = function(name) {
  var tab = $('a[data-value=' + name + ']');
  tab.unbind('click.tab');
  tab.removeClass('disabledSubMenu');
}
"