UI_BASE

SYNOPSIS

{ path }

DESCRIPTION

This variable specifies the relative path to the admin interface. It is used system-wide.

VARIABLE TYPE

Catalog variable

EXAMPLES

No examples are available at this time. We do consider this a problem and will try to supply some.

NOTES

This variable should be set in dist/lib/UI/ui.cfg.

AVAILABILITY

UI_BASE is available in Interchange versions:

4.6.0, 4.8.0

SOURCE

Interchange 4.8.0:

Source: dist/lib/UI/Primitive.pm
Line 124 (context shows lines 114-128 in wrap_edit():107)

}
else {
return $::Variable->{$name} if ! $::Variable->{$name};
$ref = { variable => $::Variable->{$name} };
}
if ($ref->{variable} =~ s/^(\s*\[)include(\s+)/$1 . 'file' . $2/e) {
$ref->{variable} = ::interpolate_html($ref->{variable});
}
my $edit_link;
my $url = $Vend::Cfg->{VendURL};
$url =~ s!/ui_wrap$!$::Variable->{UI_BASE} || $Global::Variable->{UI_BASE} || 'admin'!e;
$url .= "/";
if(not $edit_link = $::Variable->{UI_EDIT_LINK}) {
my $url = Vend::Interpolate::tag_area(
        "$::Variable->{UI_BASE}/compedit",

Source: dist/lib/UI/Primitive.pm
Line 128 (context shows lines 118-132 in wrap_edit():107)

}
if ($ref->{variable} =~ s/^(\s*\[)include(\s+)/$1 . 'file' . $2/e) {
$ref->{variable} = ::interpolate_html($ref->{variable});
}
my $edit_link;
my $url = $Vend::Cfg->{VendURL};
$url =~ s!/ui_wrap$!$::Variable->{UI_BASE} || $Global::Variable->{UI_BASE} || 'admin'!e;
$url .= "/";
if(not $edit_link = $::Variable->{UI_EDIT_LINK}) {
my $url = Vend::Interpolate::tag_area(
"$::Variable->{UI_BASE}/compedit",
$name,
);
$url =~ s:/ui_wrap/:/:;
$edit_link = <<EOF;

Source: dist/lib/UI/Primitive.pm
Line 732 (context shows lines 722-736 in uploadhelper_widget():722)

sub uploadhelper_widget {
# $column, $value, $record->{outboard}, $record->{width}
  my ($name, $val, $path, $size) = @_;

$path =~ s:^/+::;
my $view_url;
$size = qq{ SIZE="$size"} if $size > 0;
my $out = '';
  if ($val) {
  if($path) {
    my $base = $::Variable->{UI_BASE} || 'admin';
    my $view_url = Vend::Interpolate::tag_area("$base/do_view", "$path/$val");
    $out .= qq{<A HREF="$view_url">};
  }
  $out .= $val;

Source: dist/lib/UI/usertag/file_navigator.tag
Line 21 (context shows lines 11-25)

      sub S_ISGID {return 1024}
      sub S_ISVTX {return 512}
}
sub {
my ($dir_mask, $opt) = @_;


#::logDebug("file-nav dir_mask: $dir_mask opt: " . ::uneval($opt));
  $dir_mask = '*';

my $base_admin = ( $::Variable->{UI_BASE} || 'admin');
my $base_url = $Vend::Cfg->{VendURL}
      . '/'
      . $base_admin;
my $full_path;

Source: dist/lib/UI/usertag/version.tag
Line 21 (context shows lines 11-25)

my @out;
my $done_something;

if($opt->{global_error}) {
  push @out, $Global::ErrorFile;
  $done_something = 1;
}

if($opt->{local_error}) {
  my $fn = $Vend::Cfg->{ErrorFile};
  push @out, $Tag->page( "$::Variable->{UI_BASE}/do_view", $fn) . "$fn</A>";
  $done_something = 1;
}

if($opt->{env}) {

Source: dist/usertag/reconfig_wait.tag
Line 12 (context shows lines 2-16)

UserTag reconfig-wait Version $Revision: 2.1.2.1 $
UserTag reconfig-wait Routine <<EOR
sub {
my $name = shift || $Vend::Cfg->{CatalogName};
my $myname = $Vend::Cfg->{CatalogName};
return '' unless $myname eq '_mv_admin' or $myname eq $name;
  my $now = time() - 2;
  my $mod;
if($Global::HouseKeeping > 5) {
  my $link = Vend::Tags->page({
      href => "$::Variable->{UI_BASE}/genconfig",
      form => "start_at_index=1",
      });
  return qq{
HouseKeeping value of $Global::HouseKeeping seconds too long to wait. Check

AUTHORS

Interchange Development Group


UI_ACCESS_TABLE		UI_COMPONENT_DIR

Name