null+****@clear*****
null+****@clear*****
Thu Jun 7 21:47:30 JST 2012
yuta yamada 2012-06-07 21:47:30 +0900 (Thu, 07 Jun 2012)
New Revision: 50f43f157e51bfca85203f01e573a86496486b35
Log:
content -> raw-json-data
Modified files:
logalimacs.el
Modified: logalimacs.el (+2 -2)
===================================================================
--- logalimacs.el 2012-06-07 21:46:59 +0900 (30fa524)
+++ logalimacs.el 2012-06-07 21:47:30 +0900 (b4543ff)
@@ -245,8 +245,8 @@
((string-match "[a-zA-Z]" word)
(return (concat word " -S=en -T=ja")))))
-(defun loga-convert-from-json (content)
- (let* ((json (json-read-from-string content))
+(defun loga-convert-from-json (raw-json-data)
+ (let* ((json (json-read-from-string raw-json-data))
keywords converted-list)
(setq keywords (loga-extract-keywords-from json)
loga-current-max-length (loga-compute-max-length keywords)