[첫화면으로]UseModWiki소스수정/사용자아이디

마지막으로 [b]

변경사항 (가장 최근의 "소소한 수정"부터) (다른 변경사항 없음)

-6,7 +6,7
** [[주인장]]이 이런저런 테스트를 거쳐 제대로 동작한다고 결론을 내렸으나, 확실한 것은 아니다. 전혀 뜻밖의 문제가 생길지도 모른다..
:
{{{perl
{{{#!vim perl
sub DoUpdatePrefs {
    ...
    print '<br>';

-22,7 +22,7
}}}
:
{{{perl
{{{#!vim perl
sub DoLogin {
    my ($uid, $password, $success);


사용자 아이디의 첫글자를 무조건 대문자로 만듦

sub DoUpdatePrefs {
    ...
    print '<br>';
### 다음 두 줄을 수정한다.
#   $UserID = &GetParam("p_username",  "");
#   $username = &GetParam("p_username",  "");
    $UserID = &FreeToNormal(&GetParam("p_username",  ""));
    $username = &FreeToNormal(&GetParam("p_username",  ""));
###
    if ($FreeLinks) {
    ...
}

sub DoLogin {
    my ($uid, $password, $success);

    $success = 0;
### 다음 한 줄을 수정한다
#   $uid = &GetParam("p_userid", "");
    $uid = &FreeToNormal(&GetParam("p_userid", ""));
###
    $password = &GetParam("p_password",  "");
    ...
}


위키위키분류

마지막 편집일: 2007-1-8 12:19 pm (변경사항 [d])
1166 hits | Permalink | 변경내역 보기 [h] | 페이지 소스 보기