Revision: 7385
Author: deton.kih
Date: Wed Dec 28 20:21:22 2011
Log: * scm/tutcode.scm
- Update comment.
http://code.google.com/p/uim/source/detail?r=7385
Modified:
/trunk/scm/tutcode.scm
=======================================
--- /trunk/scm/tutcode.scm Thu Dec 1 03:13:47 2011
+++ /trunk/scm/tutcode.scm Wed Dec 28 20:21:22 2011
@@ -293,11 +293,11 @@
;;; ´Á»ú¥³¡¼¥ÉÆþÎϤdzÎÄꤷ¤¿Ê¸»úÎó¤òºÆÆþÎϤ¹¤ë¥â¡¼¥É¡£
;;; tutcode-history-size¤ò1°Ê¾å¤ËÀßÄꤹ¤ë¤È͸ú¤Ë¤Ê¤ê¤Þ¤¹¡£
;;;
-;;; ¡Ú¥¢¥ó¥É¥¥¡Û
+;;; ¡Ú³ÎÄê¼è¤ê¾Ã¤·¡Û
+;;; ľÁ°¤Î³ÎÄê¤ò¼è¤ê¾Ã¤·¤Þ¤¹(tutcode-undo-sequence)¡£
;;; °Ê²¼¤ÎÊÑ´¹¤Ç¤Ï¡¢ÊÑ´¹¸å¤Ë³ÎÄꤵ¤ì¤ëʸ»úÎó¤ò³Îǧ¤¹¤ëµ¡²ñ̵¤·¤Ë
;;; ³ÎÄê¤ò¹Ô¤¦¤Î¤Ç¡¢°Õ¿Þ¤·¤Ê¤¤´Á»ú¤Ë³ÎÄꤵ¤ì¤ë¤³¤È¤¬¤¢¤ê¤Þ¤¹¡£
-;;; ¤½¤Î¤è¤¦¤Ê¾ì¹ç¤Ç¤â¡¢ºÇ½é¤«¤éÆþÎϤ·Ä¾¤µ¤Ê¤¯¤Æ¤¹¤à¤è¤¦¤Ë¡¢
-;;; ¥¢¥ó¥É¥¥µ¡Ç½¤òÄɲä·¤Þ¤·¤¿¡£
+;;; ¤³¤Î¾ì¹ç¤Ë¡¢ºÇ½é¤«¤é¤ÎÆþÎϤ·Ä¾¤·¤òÉÔÍפ¹¤ë¤¿¤á¤Îµ¡Ç½¤Ç¤¹¡£
;;; (³ÎÄêºÑʸ»úÎó¤òºï½ü¤¹¤ë¤¿¤á¡¢uim¤Îsurrounding text API¤ò»È¤¤¤Þ¤¹)
;;; + Éô¼ó¹çÀ®ÊÑ´¹:
2ʸ»úÌܤÎÉô¼óÆþÎϤˤè¤êÊÑ´¹¡¦³ÎÄ곫»Ï(Æä˺Ƶ¢Åª¤Ê¾ì¹ç)
;;; + ´Á»ú¥³¡¼¥ÉÆþÎÏ
@@ -347,6 +347,36 @@
;;; * ²¾ÁÛ¸°È×ɽ¼¨µ¡Ç½¤òÄɲá£
;;; * ¼«Æ°¥Ø¥ë¥×ɽ¼¨µ¡Ç½¤òÄɲá£
;;; * Êä´°/ͽ¬ÆþÎÏ¡¦½Ï¸ì¥¬¥¤¥Éµ¡Ç½¤òÄɲá£
+;;; ¡Ú¸õÊ䥦¥£¥ó¥É¥¦¤ÎÃÙ±äɽ¼¨¡Û
+;;;
ÃÙ±äɽ¼¨¤ÎÌÜŪ:¥æ¡¼¥¶¤¬ÆþÎÏ»þ¤Ë¥Ø¥ë¥×¤äÊä´°¤Î½èÍý´°Î»¤òÂÔ¤¿¤º¤Ë¤¹¤à¤è¤¦¤Ë¡£
+;;; +
¼«Æ°¥Ø¥ë¥×¤ÎºîÀ®¤Ë¾¯¤·»þ´Ö¤¬¤«¤«¤ë¤¿¤á¡¢¼«Æ°¥Ø¥ë¥×¤¬É½¼¨¤µ¤ì¤ë¤Þ¤Ç¤Î´Ö¤Ë
+;;; °Ê¹ß¤Îʸ»ú¤Î¥¡¼ÆþÎϤò¤·¤Æ¤âÆþÎϤ·¤¿Ê¸»ú¤¬É½¼¨¤µ¤ì¤Ê¤¤ÌäÂê¤ËÂнè
+;;;
+ °ìÄê»þ´Ö¥¡¼ÆþÎϤ¬Ìµ¤¤¾ì¹ç¤Î¤ß¥Ø¥ë¥×(²¾ÁÛ¸°È×)¤äÊä´°/ͽ¬ÆþÎϸõÊäɽ¼¨
+;;; (̤鷺ÆþÎϤ·¤Æ¤¤¤ë´Ö¤Ï;·×¤Ê¥Ø¥ë¥×¤Ïɽ¼¨¤·¤Ê¤¤)
+;;; ÃÙ±äɽ¼¨¤Îή¤ì:
+;;; candwin tutcode.scm
+;;; [ɽ¼¨¤Î¤ß¤òÃٱ䤹¤ë¾ì¹ç]
+;;; ¸õÊä¥ê¥¹¥È¤òºîÀ®¤·nr,display_limit¤ò·×»»
+;;; <-- im-delay-activate-candidate-selector
+;;; ¥¿¥¤¥ÞÀßÄꤷ¤ÆÂÔ¤Ä
+;;; ¥¿¥¤¥ÞËþλ
+;;; --> delay-activating-handler
+;;; nr,display_limit,index¤òÊÖ¤¹
+;;; --> get-candidate-handler (¸õÊä¤òÊÖ¤¹)
+;;; ¸õÊäɽ¼¨
+;;;
+;;; [¸õÊä¥ê¥¹¥È¤ÎºîÀ®¤âÃٱ䤹¤ë¾ì¹ç]
+;;; <-- im-delay-activate-candidate-selector
+;;; ¥¿¥¤¥ÞÀßÄꤷ¤ÆÂÔ¤Ä
+;;; ¥¿¥¤¥ÞËþλ
+;;; --> delay-activating-handler
+;;; ¸õÊä¥ê¥¹¥È¤òºîÀ®¤·¡¢
+;;; nr,display_limit,index¤òÊÖ¤¹
+;;; --> get-candidate-handler (¸õÊä¤òÊÖ¤¹)
+;;; ¸õÊäɽ¼¨
+;;;
+;;; (¥¿¥¤¥ÞËþλÁ°¤Ë¥¡¼ÆþÎÏÅù¤Ë¤è¤êim-{de,}activate-candidate-selector
+;;; ¤¬¸Æ¤Ð¤ì¤¿¤é¥¿¥¤¥Þ¥¥ã¥ó¥»¥ë)
(require-extension (srfi 1 2 8 69))
(require "generic.scm")
@@ -561,36 +591,6 @@
;;; ¼«Æ°¥Ø¥ë¥×ºîÀ®»þ´Ö¾å¸Â[s]
(define tutcode-auto-help-time-limit 3)
-;;;
ÃÙ±äɽ¼¨¤ÎÌÜŪ:¥æ¡¼¥¶¤¬ÆþÎÏ»þ¤Ë¥Ø¥ë¥×¤äÊä´°¤Î½èÍý´°Î»¤òÂÔ¤¿¤º¤Ë¤¹¤à¤è¤¦¤Ë¡£
-;;; +
¼«Æ°¥Ø¥ë¥×¤ÎºîÀ®¤Ë¾¯¤·»þ´Ö¤¬¤«¤«¤ë¤¿¤á¡¢¼«Æ°¥Ø¥ë¥×¤¬É½¼¨¤µ¤ì¤ë¤Þ¤Ç¤Î´Ö¤Ë
-;;; °Ê¹ß¤Îʸ»ú¤Î¥¡¼ÆþÎϤò¤·¤Æ¤âÆþÎϤ·¤¿Ê¸»ú¤¬É½¼¨¤µ¤ì¤Ê¤¤ÌäÂê¤ËÂнè
-;;;
+ °ìÄê»þ´Ö¥¡¼ÆþÎϤ¬Ìµ¤¤¾ì¹ç¤Î¤ß¥Ø¥ë¥×(²¾ÁÛ¸°È×)¤äÊä´°/ͽ¬ÆþÎϸõÊäɽ¼¨
-;;; (̤鷺ÆþÎϤ·¤Æ¤¤¤ë´Ö¤Ï;·×¤Ê¥Ø¥ë¥×¤Ïɽ¼¨¤·¤Ê¤¤)
-;;; ÃÙ±äɽ¼¨¤Îή¤ì:
-;;; candwin tutcode.scm
-;;; [ɽ¼¨¤Î¤ß¤òÃٱ䤹¤ë¾ì¹ç]
-;;; ¸õÊä¥ê¥¹¥È¤òºîÀ®¤·nr,display_limit¤ò·×»»
-;;; <-- im-delay-activate-candidate-selector
-;;; ¥¿¥¤¥ÞÀßÄꤷ¤ÆÂÔ¤Ä
-;;; ¥¿¥¤¥ÞËþλ
-;;; --> delay-activating-handler
-;;; nr,display_limit,index¤òÊÖ¤¹
-;;; --> get-candidate-handler (¸õÊä¤òÊÖ¤¹)
-;;; ¸õÊäɽ¼¨
-;;;
-;;; [¸õÊä¥ê¥¹¥È¤ÎºîÀ®¤âÃٱ䤹¤ë¾ì¹ç]
-;;; <-- im-delay-activate-candidate-selector
-;;; ¥¿¥¤¥ÞÀßÄꤷ¤ÆÂÔ¤Ä
-;;; ¥¿¥¤¥ÞËþλ
-;;; --> delay-activating-handler
-;;; ¸õÊä¥ê¥¹¥È¤òºîÀ®¤·¡¢
-;;; nr,display_limit,index¤òÊÖ¤¹
-;;; --> get-candidate-handler (¸õÊä¤òÊÖ¤¹)
-;;; ¸õÊäɽ¼¨
-;;;
-;;; (¥¿¥¤¥ÞËþλÁ°¤Ë¥¡¼ÆþÎÏÅù¤Ë¤è¤êim-{de,}activate-candidate-selector
-;;; ¤¬¸Æ¤Ð¤ì¤¿¤é¥¿¥¤¥Þ¥¥ã¥ó¥»¥ë)
-
;;; ½Ï¸ì¥¬¥¤¥ÉÍÑ¥Þ¡¼¥¯
(define tutcode-guide-mark "+")
;;; ½Ï¸ì¥¬¥¤¥ÉÍѽªÎ»¥Þ¡¼¥¯
@@ -5846,9 +5846,6 @@
;;; ÃÙ±äɽ¼¨¤ËÂбþ¤·¤Æ¤¤¤ë¸õÊ䥦¥£¥ó¥É¥¦¤¬¡¢ÂÔ¤Á»þ´ÖËþλ»þ¤Ë
;;; (¸õÊä¿ô¡¢¥Ú¡¼¥¸Æâ¸õÊäɽ¼¨¿ô¡¢ÁªÂò¤µ¤ì¤¿¥¤¥ó¥Ç¥Ã¥¯¥¹ÈÖ¹æ)¤ò
;;; ¼èÆÀ¤¹¤ë¤¿¤á¤Ë¸Æ¤Ö´Ø¿ô
-;;; @param nr ¸½ºß¸õÊ䥦¥£¥ó¥É¥¦¤¬Ç§¼±¤·¤Æ¤¤¤ë¸õÊä¿ô
-;;; (activate»þ¤Î°ú¿ô¤Ç»ØÄꤷ¤¿ÃÍ)¡£-1¤Î¾ì¹ç¤Ï¸õÊä¥ê¥¹¥È¤ÎºîÀ®¤¬É¬Í×
-;;; @param display-limit ¸½ºß¸õÊ䥦¥£¥ó¥É¥¦¤¬Ç§¼±¤·¤Æ¤¤¤ëdisplay-limit
;;; @return (nr display-limit selected-index)
(define (tutcode-delay-activating-handler c)
(let ((tc (tutcode-find-descendant-context c)))
