blob: 19925c65c4546ab69136161dfd9a33c9cc33e2ab (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
--- a/yc.el
+++ b/yc.el
@@ -2071,7 +2071,7 @@
;; $BJ8@a$r;XDj$7$J$$>l9g!"8=:_$NJ8@a$,BP>]$H$J$k(B
;; $BFI$_$r<hF@$7$?J8@a$O$=$NFI$_$r%-%c%C%7%e$9$k(B
;; cut $B$,(B $BHs(Bnil $B$N>l9g!";XDjJ8@a0J9_$NFI$_$r:o=|$9$k(B
-(defun yc-yomi (&optional idx &optional cut)
+(defun yc-yomi (&optional idx cut)
(if (integerp idx)
(yc-put-bunsetsu-yomi idx (yc-get-bunsetsu-yomi idx cut) cut)
(yc-put-bunsetsu-yomi yc-mark (yc-get-bunsetsu-yomi yc-mark cut) cut)))
|
GitWeb
