-
Notifications
You must be signed in to change notification settings - Fork 46
Open
Description
skk-pre-henkanを試してみましたが、エラーが出て変換候補が出ません。
バックトレースには以下のようなメッセージが出ます。
Debugger entered--Lisp error: (wrong-type-argument stringp nil)
set-buffer(nil)
(save-current-buffer (set-buffer (skk-get-jisyo-buffer (symbol-value jisyo) (quote nomsg))) (goto-char skk-okuri-nasi-min) (while (and (re-search-forward key nil t) (< i 100)) (setq candidates (concat candidates (buffer-substring-no-properties (point) (progn (end-of-line) (point))))) (setq i (1+ i))))
(while --dolist-tail-- (setq jisyo (car --dolist-tail--)) (save-current-buffer (set-buffer (skk-get-jisyo-buffer (symbol-value jisyo) (quote nomsg))) (goto-char skk-okuri-nasi-min) (while (and (re-search-forward key nil t) (< i 100)) (setq candidates (concat candidates (buffer-substring-no-properties (point) (progn (end-of-line) (point))))) (setq i (1+ i)))) (setq --dolist-tail-- (cdr --dolist-tail--)))
(let ((--dolist-tail-- list-jisyo) jisyo) (while --dolist-tail-- (setq jisyo (car --dolist-tail--)) (save-current-buffer (set-buffer (skk-get-jisyo-buffer (symbol-value jisyo) (quote nomsg))) (goto-char skk-okuri-nasi-min) (while (and (re-search-forward key nil t) (< i 100)) (setq candidates (concat candidates (buffer-substring-no-properties (point) (progn ... ...)))) (setq i (1+ i)))) (setq --dolist-tail-- (cdr --dolist-tail--))))
(let ((list-jisyo (quote (skk-jisyo skk-large-jisyo))) (key (format "^%s.* /" (car (split-string skk-comp-key "*" t)))) (i 0) candidates) (let ((--dolist-tail-- list-jisyo) jisyo) (while --dolist-tail-- (setq jisyo (car --dolist-tail--)) (save-current-buffer (set-buffer (skk-get-jisyo-buffer (symbol-value jisyo) (quote nomsg))) (goto-char skk-okuri-nasi-min) (while (and (re-search-forward key nil t) (< i 100)) (setq candidates (concat candidates (buffer-substring-no-properties ... ...))) (setq i (1+ i)))) (setq --dolist-tail-- (cdr --dolist-tail--)))) (if candidates (progn (split-string candidates "/" t))))
skk-pre-henkan-make-candidates()
(setq skk-pre-henkan-candidates (skk-pre-henkan-make-candidates))
(progn (setq skk-pre-henkan-candidates (skk-pre-henkan-make-candidates)))
(if skk-comp-first (progn (setq skk-pre-henkan-candidates (skk-pre-henkan-make-candidates))))
(if (string= skk-comp-key "") nil (if skk-comp-first (progn (setq skk-pre-henkan-candidates (skk-pre-henkan-make-candidates)))) (prog1 (car (skk-treat-strip-note-from-word (car skk-pre-henkan-candidates))) (setq skk-pre-henkan-candidates (cdr skk-pre-henkan-candidates))))
skk-pre-henkan()
eval((skk-pre-henkan))
Metadata
Metadata
Assignees
Labels
No labels