PurpleWiki

 view release on metacpan or  search on metacpan

wiki.pl  view on Meta::CPAN

  $id = GetParam("id", "");
  my $iname = &GetParam("xri_iname", "");
  if ($action ne "") {
    $action = lc($action);
    if ($action eq "edit") {
      DoEdit($id, 0, 0, "", 0)  if ValidIdOrDie($id);
    } elsif ($action eq "unlock") {
      DoUnlock();
    } elsif ($action eq "index") {
      DoIndex();
    } elsif ($action eq "editprefs") {
      DoEditPrefs();
    } elsif ($config->UseINames && $action eq "getiname") {
      if (!$user) {
          &DoGetIname();
      }
      else { # return an error
      }
    } elsif ($action eq "login") {
      DoEnterLogin();
    } elsif ($action eq "newlogin") {

wiki.pl  view on Meta::CPAN

  }

  $iname = &GetParam("iname", "");
  if ($config->UseINames && $iname) {
      my $localId = &GetParam("local_id", "");
      my $rrsid = &GetParam("rrsid", "");
      &DoAssociateIname($iname, $localId, $rrsid);
      return;
  }
  
  if (&GetParam("edit_prefs", 0)) {
    &DoUpdatePrefs();
    return;
  }
  if (GetParam("enter_login", 0)) {
    DoLogin();
    return;
  }
  $search = GetParam("search", "");
  if (($search ne "") || (GetParam("dosearch", "") ne "")) {
    DoSearch($search);

wiki.pl  view on Meta::CPAN

        $pageName =~ s/([a-z])([0-9])/$1 $2/g;
    }
    return $pageName;
}

sub globalTemplateVars {
    return (siteName => $config->SiteName,
            baseUrl => $config->ScriptName,
            homePage => $config->HomePage,
            userName => $user ? $user->username : undef,
            preferencesUrl => $config->ScriptName . '?action=editprefs');
}

&DoWikiRequest()  if ($config->RunCGI && ($_ ne 'nocgi'));   # Do everything.
1; # In case we are loaded from elsewhere
# == End of UseModWiki script. ===========================================

wikidb/templates/preferencesEdit.tt  view on Meta::CPAN

[% INCLUDE common/header.tt
           title = "Editing Preferences"
%]

<form method="post" action="[% baseUrl %]" enctype="application/x-www-form-urlencoded">
<input type="hidden" name="edit_prefs" value="1" />

<p><b>User Information:</b><br />
UserName: 
[% IF userName %]
[% userName %]
[% ELSE %]
<input type="text" name="p_username" size="20" maxlength="50" />
(blank to remove, or valid page name)
[% END %]
<br />