X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;ds=sidebyside;f=product.el;h=32fc6bfbc04ba99ace87f06bc0c1faf525cfab0c;hb=4f4c693a1b54e8254d1aaa42c5c070e6311b9d52;hp=70eae24ea47093ba513febcfe2359591bfdea80d;hpb=774c18d282ffe474551d515ac329ddc3daf26ea4;p=elisp%2Fapel.git diff --git a/product.el b/product.el index 70eae24..32fc6bf 100644 --- a/product.el +++ b/product.el @@ -96,7 +96,7 @@ numbers. Optional 4th argument CODE-NAME is a string." "Set code-name of PRODUCT to CODE-NAME." (aset product 3 code-name)) (defun product-set-checkers (product checkers) - "Set ckecker functions of PRODUCT to CHECKERS." + "Set checker functions of PRODUCT to CHECKERS." (aset product 4 checkers)) (defun product-set-family-products (product products) "Set family products of PRODUCT to PRODUCTS." @@ -135,7 +135,7 @@ PRODUCT-NAME is a string of the product's name." "Add checker function(s) to a product. PRODUCT is a product structure which returned by `product-define'. The rest arguments CHECKERS should be functions. These functions -are regist to the product's checkers list, and will be called by +are registered to the product's checkers list, and will be called by `product-run-checkers'. If a checker is `ignore' will be ignored all checkers after this." (setq product (product-find product)) @@ -205,7 +205,7 @@ FEATURE is a symbol of the feature." (defun product-find (product) "Find product information. -If PROCUCT is a product structure, then return PRODUCT itself. +If PRODUCT is a product structure, then return PRODUCT itself. If PRODUCT is a string, then find product by name and return a product structure. If PRODUCT is symbol of feature, then return the feature's product."