-
Old Stable Version /
+
Old Stable Version /
Release Notes
Japanese IME
diff --git a/proxy/cgi-lib.pl b/proxy/cgi-lib.pl
index eb5167c..c82fe21 100755
--- a/proxy/cgi-lib.pl
+++ b/proxy/cgi-lib.pl
@@ -2,7 +2,7 @@
# cgi-lib@pobox.com
# $Id: cgi-lib.pl,v 2.18 1999/02/23 08:16:43 brenner Exp $
#
-# Copyright (c) 1993-1999 Steven E. Brenner
+# Copyright (c) 1993-1999 Steven E. Brenner
# Unpublished work.
# Permission granted to use and modify this library so long as the
# copyright above is maintained, modifications are documented, and
@@ -33,7 +33,7 @@
# Reads in GET or POST data, converts it to unescaped text, and puts
# key/value pairs in %in, using "\0" to separate multiple selections
-# Returns >0 if there was input, 0 if there was no input
+# Returns >0 if there was input, 0 if there was no input
# undef indicates some failure.
# Now that cgi scripts can be put in the normal file space, it is useful
@@ -45,7 +45,7 @@
# If a variable-glob (e.g., *cgi_input) is the first parameter to ReadParse,
# information is stored there, rather than in $in, @in, and %in.
# Second, third, and fourth parameters fill associative arrays analagous to
-# %in with data relevant to file uploads.
+# %in with data relevant to file uploads.
# If no method is given, the script will process both command-line arguments
# of the form: name=value and any text that is in $ENV{'QUERY_STRING'}
@@ -65,7 +65,7 @@ sub ReadParse {
local ($len, $type, $meth, $errflag, $cmdflag, $got, $name);
binmode(STDIN); # we need these for DOS-based systems
- binmode(STDOUT); # and they shouldn't hurt anything else
+ binmode(STDOUT); # and they shouldn't hurt anything else
binmode(STDERR);
# Get several useful env variables
@@ -77,7 +77,7 @@ sub ReadParse {
&CgiDie("cgi-lib.pl: Request to receive too much data: $len bytes\n");
}
- if (!defined $meth || $meth eq '' || $meth eq 'GET' ||
+ if (!defined $meth || $meth eq '' || $meth eq 'GET' ||
$meth eq 'HEAD' ||
$type eq 'application/x-www-form-urlencoded') {
local ($key, $val, $i);
@@ -95,14 +95,14 @@ sub ReadParse {
&CgiDie("cgi-lib.pl: Unknown request method: $meth\n");
}
- @in = split(/[&;]/,$in);
+ @in = split(/[&;]/,$in);
push(@in, @ARGV) if $cmdflag; # add command-line parameters
foreach $i (0 .. $#in) {
# Convert plus to space
$in[$i] =~ s/\+/ /g;
- # Split into key and value.
+ # Split into key and value.
($key, $val) = split(/=/,$in[$i],2); # splits on the first =.
# Convert %XX from hex numbers to alphanumeric
@@ -120,16 +120,16 @@ sub ReadParse {
local ($buf, $boundary, $head, @heads, $cd, $ct, $fname, $ctype, $blen);
local ($bpos, $lpos, $left, $amt, $fn, $ser);
- local ($bufsize, $maxbound, $writefiles) =
+ local ($bufsize, $maxbound, $writefiles) =
($cgi_lib'bufsize, $cgi_lib'maxbound, $cgi_lib'writefiles);
# The following lines exist solely to eliminate spurious warning messages
- $buf = '';
+ $buf = '';
($boundary) = $type =~ /boundary="([^"]+)"/; #"; # find boundary
($boundary) = $type =~ /boundary=(\S+)/ unless $boundary;
- &CgiDie ("Boundary not provided: probably a bug in your server")
+ &CgiDie ("Boundary not provided: probably a bug in your server")
unless $boundary;
$boundary = "--" . $boundary;
$blen = length ($boundary);
@@ -143,7 +143,7 @@ sub ReadParse {
stat ($writefiles);
$writefiles = "/tmp" unless -d _ && -w _;
# ($me) = $0 =~ m#([^/]*)$#;
- $writefiles .= "/$cgi_lib'filepre";
+ $writefiles .= "/$cgi_lib'filepre";
}
# read in the data and split into parts:
@@ -168,22 +168,22 @@ sub ReadParse {
while (1) {
die $@ if $errflag;
- $amt = ($left > $bufsize+$maxbound-length($buf)
+ $amt = ($left > $bufsize+$maxbound-length($buf)
? $bufsize+$maxbound-length($buf): $left);
$errflag = (($got = read(STDIN, $buf, $amt, length($buf))) != $amt);
die "Short Read: wanted $amt, got $got\n" if $errflag;
$left -= $amt;
- $in{$name} .= "\0" if defined $in{$name};
+ $in{$name} .= "\0" if defined $in{$name};
$in{$name} .= $fn if $fn;
$name=~/([-\w]+)/; # This allows $insfn{$name} to be untainted
if (defined $1) {
- $insfn{$1} .= "\0" if defined $insfn{$1};
+ $insfn{$1} .= "\0" if defined $insfn{$1};
$insfn{$1} .= $fn if $fn;
}
- BODY:
+ BODY:
while (($bpos = index($buf, $boundary)) == -1) {
if ($left == 0 && $buf eq '') {
foreach $value (values %insfn) {
@@ -210,7 +210,7 @@ sub ReadParse {
close (FILE);
last PART if substr($buf, $bpos + $blen, 2) eq "--";
substr($buf, 0, $bpos+$blen+2) = '';
- $amt = ($left > $bufsize+$maxbound-length($buf)
+ $amt = ($left > $bufsize+$maxbound-length($buf)
? $bufsize+$maxbound-length($buf) : $left);
$errflag = (($got = read(STDIN, $buf, $amt, length($buf))) != $amt);
die "Short Read: wanted $amt, got $got\n" if $errflag;
@@ -219,7 +219,7 @@ sub ReadParse {
undef $head; undef $fn;
HEAD:
- while (($lpos = index($buf, "\r\n\r\n")) == -1) {
+ while (($lpos = index($buf, "\r\n\r\n")) == -1) {
if ($left == 0 && $buf eq '') {
foreach $value (values %insfn) {
unlink(split("\0",$value));
@@ -241,12 +241,12 @@ sub ReadParse {
($cd) = grep (/^\s*Content-Disposition:/i, @heads);
($ct) = grep (/^\s*Content-Type:/i, @heads);
- ($name) = $cd =~ /\bname="([^"]+)"/i; #";
- ($name) = $cd =~ /\bname=([^\s:;]+)/i unless defined $name;
+ ($name) = $cd =~ /\bname="([^"]+)"/i; #";
+ ($name) = $cd =~ /\bname=([^\s:;]+)/i unless defined $name;
($fname) = $cd =~ /\bfilename="([^"]*)"/i; #"; # filename can be null-str
($fname) = $cd =~ /\bfilename=([^\s:;]+)/i unless defined $fname;
- $incfn{$name} .= (defined $in{$name} ? "\0" : "") .
+ $incfn{$name} .= (defined $in{$name} ? "\0" : "") .
(defined $fname ? $fname : "");
($ctype) = $ct =~ /^\s*Content-type:\s*"([^"]+)"/i; #";
@@ -287,7 +287,7 @@ sub ReadParse {
$^W = $perlwarn;
- return ($errflag ? undef : scalar(@in));
+ return ($errflag ? undef : scalar(@in));
}
@@ -359,7 +359,7 @@ sub MethPost {
sub MyBaseUrl {
local ($ret, $perlwarn);
$perlwarn = $^W; $^W = 0;
- $ret = 'http://' . $ENV{'SERVER_NAME'} .
+ $ret = 'http://' . $ENV{'SERVER_NAME'} .
($ENV{'SERVER_PORT'} != 80 ? ":$ENV{'SERVER_PORT'}" : '') .
$ENV{'SCRIPT_NAME'};
$^W = $perlwarn;
@@ -372,7 +372,7 @@ sub MyBaseUrl {
sub MyFullUrl {
local ($ret, $perlwarn);
$perlwarn = $^W; $^W = 0;
- $ret = 'http://' . $ENV{'SERVER_NAME'} .
+ $ret = 'http://' . $ENV{'SERVER_NAME'} .
($ENV{'SERVER_PORT'} != 80 ? ":$ENV{'SERVER_PORT'}" : '') .
$ENV{'SCRIPT_NAME'} . $ENV{'PATH_INFO'} .
(length ($ENV{'QUERY_STRING'}) ? "?$ENV{'QUERY_STRING'}" : '');
@@ -394,7 +394,7 @@ sub MyURL {
# markup, etcetera.
# Parameters:
# If no parameters, gives a generic error message
-# Otherwise, the first parameter will be the title and the rest will
+# Otherwise, the first parameter will be the title and the rest will
# be given as different paragraphs of the body
sub CgiError {
@@ -407,7 +407,7 @@ sub CgiError {
};
if (!$cgi_lib'headerout) { #')
- print &PrintHeader;
+ print &PrintHeader;
print "\n\n
$msg[0]\n\n\n";
}
print "
$msg[0]
\n";
diff --git a/scripts/JS_IM_aynu.js b/scripts/JS_IM_aynu.js
index a53cbf4..7f1a55e 100644
--- a/scripts/JS_IM_aynu.js
+++ b/scripts/JS_IM_aynu.js
@@ -633,7 +633,7 @@ function kup() {
// lastTextLength + 一文字 = mytext.length ならば，キー入力があったとみなして，
// romaji->kana変換をする．
// 逆にいえば，lastTextLength != mytext.length - 1 なら，romaji->kana変換はしない
- if(lastTextLength != (mytext.length - 1)) return;
+ if(lastTextLength != (mytext.length - 1)) return;
if(mytext.length <= 0) return; //BackSpaceを押した時の対策
mykey = mytext.substring(mytext.length - 1, mytext.length);
mytext = mytext.substring(0, mytext.length - 1);
diff --git a/scripts/caret.js b/scripts/caret.js
index f7e8f2e..6a15600 100755
--- a/scripts/caret.js
+++ b/scripts/caret.js
@@ -190,9 +190,9 @@ var Caret = {
var copyProps = [
'width','height',
'margin-top','margin-bottom','margin-left','margin-right',
- 'padding-left', 'padding-right', 'padding-top', 'padding-bottom',
- 'border-left-style', 'border-right-style','border-top-style','border-bottom-style',
- 'border-left-width', 'border-right-width','border-top-width','border-bottom-width',
+ 'padding-left', 'padding-right', 'padding-top', 'padding-bottom',
+ 'border-left-style', 'border-right-style','border-top-style','border-bottom-style',
+ 'border-left-width', 'border-right-width','border-top-width','border-bottom-width',
'font-family','font-size','line-height', 'letter-spacing', 'word-spacing'
];
var setElmStyle = function (element){
@@ -200,7 +200,7 @@ var Caret = {
elmClone.style[copyProps[i].camelize()] = element.getStyle(copyProps[i]);
}
- elmClone.style.visibility="hidden";
+ elmClone.style.visibility="hidden";
elmClone.style.position = "absolute";
elmClone.style.textAlign = "left";
//elmClone.scrollLeft = element.scrollLeft;
diff --git a/scripts/johab-l.js b/scripts/johab-l.js
index 34c5ed4..1171f79 100755
--- a/scripts/johab-l.js
+++ b/scripts/johab-l.js
@@ -59,10 +59,10 @@ var ksHangulString22 = "팁팃팅파팍팎판팔팖팜팝팟팠팡팥패팩팬
var ksHangulString23 = "피픽핀필핌핍핏핑하학한할핥함합핫항해핵핸핼햄햅햇했행햐향허헉헌헐헒험헙헛헝헤헥헨헬헴헵헷헹혀혁현혈혐협혓혔형혜혠혤혭호혹혼홀홅홈홉홋홍홑화확환활홧황홰홱홴횃횅회획횐횔횝횟횡효횬횰횹횻후훅훈훌훑훔훗훙훠";
var ksHangulString24 = "훤훨훰훵훼훽휀휄휑휘휙휜휠휨휩휫휭휴휵휸휼흄흇흉흐흑흔흖흗흘흙흠흡흣흥흩희흰흴흼흽힁히힉힌힐힘힙힛힝";
-
+
function isKsWansungChar(mystr) {
- if (ksHangulString1.indexOf(mystr)>=0 ||
+ if (ksHangulString1.indexOf(mystr)>=0 ||
ksHangulString2.indexOf(mystr)>=0 ||
ksHangulString3.indexOf(mystr)>=0 ||
ksHangulString4.indexOf(mystr)>=0 ||
@@ -96,7 +96,7 @@ function splitIntoKsWansung(mychar) {
if(!isWansungChar(mychar)) {
return mystr;
}
- var myHangulClass = new ClassJohabFromChar(mychar);
+ var myHangulClass = new ClassJohabFromChar(mychar);
var myfirstcode = myHangulClass.getFirstCode();
var mysecondcode = myHangulClass.getSecondCode();
var mykschar = johabFromThreeCodeToChar(myfirstcode, mysecondcode, 0);
@@ -123,5 +123,5 @@ function toKsWansungString(mystr) {
return_str += mystr.charAt(j);
}
}
- return return_str;
+ return return_str;
}
diff --git a/scripts/johab.js b/scripts/johab.js
index 5345e53..e531662 100755
--- a/scripts/johab.js
+++ b/scripts/johab.js
@@ -32,7 +32,7 @@ str strPlusJasoKeyString(str, jasoKeyString)
str strDeleteOneJaso(str)
str toHangulKeyAll(str)
-クラス
+クラス
コンストラクタ
ClassJohabFromChar(char)
ClassJohabFromKey(first_key, second_key, third_key)
@@ -54,7 +54,7 @@ void deleteOneJaso()
クラス
コンストラクタ
-ClassJohabFromJasoChar(jasoChar)
+ClassJohabFromJasoChar(jasoChar)
メソッド
char toChar()
keys getJasoKey()
@@ -371,7 +371,7 @@ function method_johabDeleteOneJaso() {
return this.toChar();
} else {
return jasoFromKeyToChar(this.getFirstKey());
- }
+ }
}
function ClassJohabFromJasoChar(mystr) {
diff --git a/scripts/pack_hangulime.sh b/scripts/pack_hangulime.sh
index 8e308b0..9654bb4 100755
--- a/scripts/pack_hangulime.sh
+++ b/scripts/pack_hangulime.sh
@@ -1,2 +1,2 @@
#!/bin/sh
-cat prototype_ie_bookmarklet.js keycode.js caret.js JS_IM.js johab.js JS_IM_hangul.js | nkf --utf8 > ../bookmarklet/js_im_packed_hangul.js
+cat prototype_ie_bookmarklet.js keycode.js caret.js JS_IM.js johab.js JS_IM_hangul.js | nkf --utf8 > ../bookmarklet/js_im_packed_hangul.js
diff --git a/scripts/pack_japaneseime.sh b/scripts/pack_japaneseime.sh
index 662a742..bc9e897 100755
--- a/scripts/pack_japaneseime.sh
+++ b/scripts/pack_japaneseime.sh
@@ -1,2 +1,2 @@
#!/bin/sh
-cat prototype_ie_bookmarklet.js keycode.js caret.js JS_IM.js roma.js JS_IM_vje.js | nkf --utf8 > ../bookmarklet/js_im_packed_vje.js
+cat prototype_ie_bookmarklet.js keycode.js caret.js JS_IM.js roma.js JS_IM_vje.js | nkf --utf8 > ../bookmarklet/js_im_packed_vje.js
diff --git a/scripts/roma.js b/scripts/roma.js
index 486bb51..cbdb977 100644
--- a/scripts/roma.js
+++ b/scripts/roma.js
@@ -1,4 +1,4 @@
-/*
+/*
http://la.ma.la/js/roma.js
JavaScriptによるローマ字仮名変換ライブラリ ver 2.0
@@ -63,7 +63,7 @@ function roma2reg(text){
slen == 2 && hira.charAt(0) == roma[h].tt && pos--;
var last_m = nstr[nstr.length-1] ? nstr[nstr.length-1][0] : "";
nstr.push(
- (hira == kata) ? [temp,hira] :
+ (hira == kata) ? [temp,hira] :
// tta → [tt,っ],[a,た]
(last_m && roma[h][last_m] == roma[h].tt
&& last_m.length == 2
@@ -94,7 +94,7 @@ function roma2reg(text){
chars[1].charAt(1) , chars[2].charAt(1),
"])"].join("") :
- (to_esc.hasOwnProperty(chars[0])) ?
+ (to_esc.hasOwnProperty(chars[0])) ?
"(?:\\" + chars.join("|") + ")" : "(?:" + chars.join("|") + ")"
);
}
