[1127] | 1 | ;; Copyright 1992 NEC Corporation, Tokyo, Japan. |
---|
| 2 | ;; |
---|
| 3 | ;; Permission to use, copy, modify, distribute and sell this software |
---|
| 4 | ;; and its documentation for any purpose is hereby granted without |
---|
| 5 | ;; fee, provided that the above copyright notice appear in all copies |
---|
| 6 | ;; and that both that copyright notice and this permission notice |
---|
| 7 | ;; appear in supporting documentation, and that the name of NEC |
---|
| 8 | ;; Corporation not be used in advertising or publicity pertaining to |
---|
| 9 | ;; distribution of the software without specific, written prior |
---|
| 10 | ;; permission. NEC Corporation makes no representations about the |
---|
| 11 | ;; suitability of this software for any purpose. It is provided "as |
---|
| 12 | ;; is" without express or implied warranty. |
---|
| 13 | ;; |
---|
| 14 | ;; NEC CORPORATION DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, |
---|
| 15 | ;; INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN |
---|
| 16 | ;; NO EVENT SHALL NEC CORPORATION BE LIABLE FOR ANY SPECIAL, INDIRECT OR |
---|
| 17 | ;; CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF |
---|
| 18 | ;; USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR |
---|
| 19 | ;; OTHER TORTUOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR |
---|
| 20 | ;; PERFORMANCE OF THIS SOFTWARE. |
---|
| 21 | |
---|
| 22 | ;; $Id: .canna,v 1.1.1.1 2004/06/20 18:00:44 daisuke Exp $ |
---|
| 23 | |
---|
| 24 | ;; µ¹æÃÖ¤´¹¤¨ÊÑ´¹¤òÍøÍѤ¹¤ë¤«¡£ |
---|
| 25 | |
---|
| 26 | (setq use-symbolic-definition t) |
---|
| 27 | |
---|
| 28 | ;;; ¥í¡¼¥Þ»ú¤«¤ÊÊÑ´¹¤ÎÀßÄê |
---|
| 29 | ; |
---|
| 30 | ; ¥í¡¼¥Þ»ú¤«¤ÊÊÑ´¹¥Æ¡¼¥Ö¥ë¤ò»ØÄꤷ¤Þ¤¹¡£¥í¡¼¥Þ»ú¤«¤ÊÊÑ´¹¥Æ¡¼¥Ö¥ë¤Ï |
---|
| 31 | ; (1) ¥«¥ì¥ó¥È¥Ç¥£¥ì¥¯¥È¥ê |
---|
| 32 | ; (2) ¥Û¡¼¥à¥Ç¥£¥ì¥¯¥È¥ê |
---|
| 33 | ; (3) /usr/lib/canna/dic |
---|
| 34 | ; ¤Î½ç¤Ë¥µ¡¼¥Á¤µ¤ì¤Þ¤¹¡£ |
---|
| 35 | ; |
---|
| 36 | |
---|
| 37 | ;(setq romkana-table "unix.cbp") |
---|
| 38 | (setq romkana-table "default.cbp") |
---|
| 39 | |
---|
| 40 | ;; ³°Íè¸ìÊÑ´¹ |
---|
| 41 | ;(setq english-table "canna/english.cbp") |
---|
| 42 | |
---|
| 43 | |
---|
| 44 | ;;; ÍøÍѤ¹¤ë¼½ñ |
---|
| 45 | ; |
---|
| 46 | ; ¤¿¤Àñ¤Ë½ñ¤Ê¤٤Ƥ¤¤ë¤Î¤Ïñ¸ìÅÐÏ¿¤ò¹Ô¤ï¤Ê¤¤¼½ñ¤Ç¥·¥¹¥Æ¥à¼½ñ¤Ê¤É¤¬ |
---|
| 47 | ; ¤³¤ì¤ËÅö¤¿¤ê¤Þ¤¹¡£ |
---|
| 48 | ; |
---|
| 49 | ; Éô¼ó¼½ñ¤Ë´Ø¤·¤Æ¤Ï :bushu ¤òÀè¹Ô¤µ¤»¤Æµ½Ò¤·¤Þ¤¹¡£ |
---|
| 50 | ; |
---|
| 51 | ; ñ¸ìÅÐÏ¿¤ò¤·¤¿¤¤¼½ñ¤Ë´Ø¤·¤Æ¤Ï :user ¤òÀè¹Ô¤µ¤»¤Æµ½Ò¤·¤Þ¤¹¡£Ã±¸ìÅÐ |
---|
| 52 | ; Ï¿¤ò¤¹¤ë¼½ñ¤Ï¥Æ¥¥¹¥È·Á¼°¼½ñ¤Ç¤Ê¤±¤ì¤Ð¤Ê¤ê¤Þ¤»¤ó¡£Ã±¸ìÅÐÏ¿¤µ¤»¤¿¤¤ |
---|
| 53 | ; ¼½ñ¤Ï mkdic user ¤ÎÍͤʥ³¥Þ¥ó¥É¤òÂǤĤ³¤È¤Ç¤Ç´Êñ¤ËºîÀ®¤¹¤ë¤³¤È¤¬¤Ç |
---|
| 54 | ; ¤¤Þ¤¹¡£ |
---|
| 55 | ; |
---|
| 56 | (use-dictionary |
---|
| 57 | "gcanna" |
---|
| 58 | "gcannaf" |
---|
| 59 | "chimei" |
---|
| 60 | ; "iroha" |
---|
| 61 | "fuzokugo" |
---|
| 62 | "hojomwd" |
---|
| 63 | "hojoswd" |
---|
| 64 | "software" |
---|
| 65 | "keishiki" |
---|
| 66 | "zipcode" |
---|
| 67 | "geo" |
---|
| 68 | "basho" |
---|
| 69 | "keisan" |
---|
| 70 | "pub" |
---|
| 71 | "scien" |
---|
| 72 | "sup" |
---|
| 73 | "bonobo" |
---|
| 74 | :bushu "bushu" |
---|
| 75 | :user "user" |
---|
| 76 | ) |
---|
| 77 | |
---|
| 78 | ;;; ¤µ¤Þ¤¶¤Þ¤Ê¥Ñ¥é¥á¥¿¤ÎÀßÄê |
---|
| 79 | ; |
---|
| 80 | ; ¿¿ÍýÃͤòÀßÄꤹ¤ë¤â¤Î¤Ë¤Ä¤¤¤Æ¤Ï¿¿¤Ë¤Ä¤¤¤Æ¤Ï t ¡¢µ¶¤Ë¤Ä¤¤¤Æ¤Ï nil ¤òÀß |
---|
| 81 | ; Äꤷ¤Þ¤¹¡£ |
---|
| 82 | |
---|
| 83 | ; °ìÈÖ±¦¤Ç±¦¤Ë¹Ô¤³¤¦¤È¤¹¤ë¤Èº¸Ã¼¤Ë¤¤¤¯¤è¤¦¤Ë¤¹¤ë¤« |
---|
| 84 | (setq cursor-wrap t) ; default t |
---|
| 85 | |
---|
| 86 | ; °ìÍ÷ɽ¼¨¤Ç¿ô»ú¤òÂǤ俤Ȥ¤Ë¥«¡¼¥½¥ë°ÜÆ°¤Ëα¤á¤ë(nil)¤«ÁªÂò¤Þ¤Ç¤·¤Æ |
---|
| 87 | ; ¤·¤Þ¤¦¤«(t) |
---|
| 88 | (setq select-direct t) ; default t |
---|
| 89 | |
---|
| 90 | ; °ìÍ÷ɽ¼¨¤Ç¿ô»ú¤ÇÁªÂò¤¹¤ë¤«(t)¡£nil¤Î»þ¤Ï¿ô»ú¤¬É½¼¨¤µ¤ì¤Þ¤»¤ó |
---|
| 91 | (setq numerical-key-select t) ; default t |
---|
| 92 | |
---|
| 93 | ; ¸õÊäɽ¼¨»þ¤ËʸÀá¤Î¶èÀÚ¤ê¤Ë¶õÇò¤ò¤¤¤ì¤ë¤« |
---|
| 94 | (setq bunsetsu-kugiri nil) ; default nil |
---|
| 95 | |
---|
| 96 | ; ʸ»ú¥Ù¡¼¥¹¤Î°ÜÆ°¤ò¤¹¤ë¤«(t)¡£ nil¤Î»þ¤Ï¥í¡¼¥Þ»ú¤«¤ÊÊÑ´¹¤Îñ°Ì¤Ç¥«¡¼ |
---|
| 97 | ; ¥½¥ë°ÜÆ°¤¬¹Ô¤ï¤ì¤Þ¤¹¡£ |
---|
| 98 | (setq character-based-move t) ; default t |
---|
| 99 | |
---|
| 100 | ; ÆþÎÏÃæ¤ÎÆɤßÁ´ÂΤò¥ê¥Ð¡¼¥¹¤¹¤ë¤« |
---|
| 101 | (setq reverse-widely nil) ; default nil |
---|
| 102 | |
---|
| 103 | ; ÉÑÅٳؽ¬¤ò¤¹¤ë¤« |
---|
| 104 | (setq gakushu t) ; default t |
---|
| 105 | |
---|
| 106 | ; °ìÍ÷¤ÎºÇ¸å¤Þ¤Ç¤¤¤Ã¤¿¤é°ìö°ìÍ÷ɽ¼¨¤ò¤ä¤á¤ë¤« |
---|
| 107 | (setq quit-if-end-of-ichiran nil); default nil |
---|
| 108 | |
---|
| 109 | ; ʸÀá¤Î±¦Ã¼¤Ç±¦°ÜÆ°¤ò¤¹¤ë¤ÈÁ´ÂΤ¬³ÎÄꤷ¤Æ¤·¤Þ¤¦¤« |
---|
| 110 | (setq kakutei-if-end-of-bunsetsu nil) ; default nil |
---|
| 111 | |
---|
| 112 | ; °ìÍ÷ÁªÂò¸åƱ¤¸Ê¸Àá¤Ë¤È¤É¤Þ¤ë¤«(t)¡£nil¤Î»þ¤Ï°ìÍ÷ÁªÂò¤ò¹Ô¤¦¤È¤Ò¤È¤ÄÀè |
---|
| 113 | ; ¤ÎʸÀá¤Ë°ÜÆ°¤·¤Þ¤¹¡£ |
---|
| 114 | (setq stay-after-validate t) ; default t |
---|
| 115 | |
---|
| 116 | ; ÆɤߤòÆþÎÏÃæ¤Ë¥Ð¥Ã¥¯¥¹¥Ú¡¼¥¹¤òÂÇ¤Ä¤È¥í¡¼¥Þ»ú¤Þ¤Ç¥Ð¥é¥Ð¥é¤Ë¤¹¤ë¤« |
---|
| 117 | (setq break-into-roman t) ; default nil |
---|
| 118 | |
---|
| 119 | ; ²¿²ó¤ÎÊÑ´¹¥¡¼¤Ç°ìÍ÷ɽ¼¨¤ò¹Ô¤¦¤«¡££°¤òÆþ¤ì¤ë¤ÈÊÑ´¹¥¡¼¤À¤±¤Ç¤Ï |
---|
| 120 | ; °ìÍ÷ɽ¼¨¤Ë¤Ï°Ü¤ê¤Þ¤»¤ó¡£¤½¤Î¾ì¹ç¤Ë¤Ï C-w ¤òÆþÎϤ·¤Æ°ìÍ÷ɽ¼¨¤·¤Æ |
---|
| 121 | ; ²¼¤µ¤¤¡£ |
---|
| 122 | (setq n-henkan-for-ichiran 2) ; default 2 |
---|
| 123 | |
---|
| 124 | ; ñ¸ìÅÐÏ¿»þ¤Ëʸˡ´ØÏ¢¤Î¼ÁÌä¤ò¤¹¤ë¤«(t)¡£nil¤Î»þ¤ÏŬÅö¤ÊÉÊ»ì¤òÉÕ¤±¤Æ¤· |
---|
| 125 | ; ¤Þ¤¤¤Þ¤¹¡£ |
---|
| 126 | (setq gramatical-question t) ; default t |
---|
| 127 | |
---|
| 128 | ; ¸õÊ䤬Á´ÂΤβ¿ÈÖÌܤ«¤òɽ¼¨¤¹¤ë¤« |
---|
| 129 | (setq kouho-count t) ; default t |
---|
| 130 | |
---|
| 131 | ; Ã༡ÊÑ´¹¤ò¤¹¤ë¤« |
---|
| 132 | (setq auto nil) ; default nil |
---|
| 133 | |
---|
| 134 | ; Ã༡ÊÑ´¹¤ò¤¹¤ë»þ¤Ë²¿¸Ä¤ÎʸÀá¤Þ¤Ç¤ò̤³ÎÄê¤ÇÊÝ»ý¤¹¤ë¤« |
---|
| 135 | (setq n-kouho-bunsetsu 16) ; default 16 |
---|
| 136 | |
---|
| 137 | ; ¥í¡¼¥Þ»ú¤«¤ÊÊÑ´¹¤Ç¥¤¥ê¡¼¥¬¥ë¤Ê¥í¡¼¥Þ»ú¤ò¼Î¤Æ¤ë¤« |
---|
| 138 | (setq abandon-illegal-phonogram nil) ; default nil |
---|
| 139 | |
---|
| 140 | ; °ìÍ÷¤Î»þ¤â¼¡¤ÎÆþÎϤòǧ¤á¤ë¤« |
---|
| 141 | (setq allow-next-input t) ; default t |
---|
| 142 | |
---|
| 143 | ; °ìʸ»ú¥ì¥Ù¥ë¤Î¥í¡¼¥Þ»ú¤«¤ÊÊÑ´¹¤ÎÊä½õ¥Æ¡¼¥Ö¥ë |
---|
| 144 | (if use-symbolic-definition |
---|
| 145 | (progn |
---|
| 146 | (defsymbol ?- "¡¼" "-" "¡Ý" "¡¾") |
---|
| 147 | (defsymbol ?/ "/" "¡¿" "¡¦") |
---|
| 148 | (defsymbol ?\\ "\\" "¡À" "¡ï") |
---|
| 149 | (defsymbol |
---|
| 150 | ?( "(" "¡Ê" "¡Ú" |
---|
| 151 | ?) ")" "¡Ë" "¡Û" ) |
---|
| 152 | (defsymbol |
---|
| 153 | ?[ "¡Ö" "¡Ø" "¡Î" "¡Ì" "[" |
---|
| 154 | ?] "¡×" "¡Ù" "¡Ï" "¡Í" "]") |
---|
| 155 | (defsymbol |
---|
| 156 | ?. "¡£" "¡¥" "." |
---|
| 157 | ?, "¡¢" "¡¤" "," ) |
---|
| 158 | (defsymbol |
---|
| 159 | ?0 "0" "£°" "¡»" "Îí" |
---|
| 160 | ?1 "1" "£±" "°ì" "°í" |
---|
| 161 | ?2 "2" "£²" "Æó" "Æõ" |
---|
| 162 | ?3 "3" "£³" "»°" "»²" |
---|
| 163 | ?4 "4" "£´" "»Í" "»Í" |
---|
| 164 | ?5 "5" "£µ" "¸Þ" "¸à" |
---|
| 165 | ?6 "6" "£¶" "Ï»" "Ï»" |
---|
| 166 | ?7 "7" "£·" "¼·" "¼·" |
---|
| 167 | ?8 "8" "£¸" "Ȭ" "Ȭ" |
---|
| 168 | ?9 "9" "£¹" "¶å" "¶å" ) |
---|
| 169 | (defsymbol |
---|
| 170 | ?? "?" "¡©" |
---|
| 171 | ?! "!" "¡ª") |
---|
| 172 | (defsymbol ?# "#" "¡ô") |
---|
| 173 | (defsymbol ?$ "$" "¡ð") |
---|
| 174 | (defsymbol ?% "%" "¡ó") |
---|
| 175 | (defsymbol ?& "&" "¡õ") |
---|
| 176 | (defsymbol ?+ "+" "¡Ü") |
---|
| 177 | (defsymbol ?* "*" "¡ö" "¡ß") |
---|
| 178 | (defsymbol ?_ "_" "¡²") |
---|
| 179 | (defsymbol ?' "'" "¡Ç") |
---|
| 180 | (defsymbol ?` "`" "¡Æ") |
---|
| 181 | (defsymbol ?\" "\"" "¡É") |
---|
| 182 | )) |
---|
| 183 | |
---|
| 184 | ;; delete ¥¡¼¤â¥Ð¥Ã¥¯¥¹¥Ú¡¼¥¹¤ÈƱ¤¸½èÍý¤ò¤µ¤»¤ë |
---|
| 185 | (global-set-key "\Delete" 'delete-previous) ; necessary in using Emacs |
---|
| 186 | |
---|
| 187 | ;; Help ¤¬¤Ê¤¤¿Í¤â¤¤¤ë¤Î¤Ç F1 ¤Ç¤âƱ¤¸Æ°ºî¤ò¤µ¤»¤ë¡£ |
---|
| 188 | (global-set-key "\F1" 'extend-mode) |
---|
| 189 | |
---|
| 190 | ;; Ctrl-o ¤ÎÍÞÀ© |
---|
| 191 | (global-unbind-key-function 'japanese-mode) |
---|