Yuta Yamada
null+****@clear*****
Tue Oct 15 10:33:33 JST 2013
Yuta Yamada 2013-10-15 10:33:33 +0900 (Tue, 15 Oct 2013) New Revision: 71e2258e9d36378fc0dfb191e426da393451c0f0 https://github.com/logaling/logalimacs/commit/71e2258e9d36378fc0dfb191e426da393451c0f0 Message: loga-delete-popup: delete needless condition-case & anonymous function Modified files: logalimacs.el Modified: logalimacs.el (+3 -8) =================================================================== --- logalimacs.el 2013-10-15 10:27:19 +0900 (7f2fa08) +++ logalimacs.el 2013-10-15 10:33:33 +0900 (d3fb448) @@ -725,14 +725,9 @@ Otherwise passed character inside region." (loga-extract-prototype-from (loga-get-search-word))))) (defun loga-delete-popup () - (let ((delete-popup - (lambda () - (with-no-warnings - (popup-live-p menu) - (popup-delete menu))))) - (condition-case error - (funcall delete-popup) - (error error)))) + (with-no-warnings + (popup-live-p menu) + (popup-delete menu))) (defun loga-singularize (word) (if (and loga-use-singular-form -------------- next part -------------- An HTML attachment was scrubbed...下載
