null+****@clear*****
null+****@clear*****
Sat Jul 21 14:15:40 JST 2012
Yuta Yamada 2012-07-21 14:15:40 +0900 (Sat, 21 Jul 2012) New Revision: 755b051192de52ee9507d33382aad1abda685583 https://github.com/logaling/logalimacs/commit/755b051192de52ee9507d33382aad1abda685583 Log: Fix behavior Modified files: logalimacs.el Modified: logalimacs.el (+3 -3) =================================================================== --- logalimacs.el 2012-07-16 01:10:48 +0900 (1d31d2f) +++ logalimacs.el 2012-07-21 14:15:40 +0900 (4f9ef75) @@ -313,7 +313,7 @@ Example: (if (and loga-use-stemming (not striped-source-word) (loga-one-word-p source-word)) - (loga-strip-from-stem endpoint source-word) + (loga-lookup endpoint (loga-strip-from-stem source-word)) (if (functionp loga-fallback-function) (loga-fallback (caar loga-word-cache)) (minibuffer-message @@ -687,9 +687,9 @@ Otherwise passed character inside region." spaceless-p))) ;; TODO: pull request stem.el to MELPA -(defun loga-strip-from-stem (endpoint source-word) +(defun loga-strip-from-stem (source-word) (require 'stem nil t) - (loga-lookup endpoint (stem:stripping-inflection source-word))) + (stem:stripping-inflection source-word)) (provide 'logalimacs) -------------- next part -------------- An HTML attachment was scrubbed...Download
