From 301ad6c4317dcb073a10b54abb2c1c0c342e2191 Mon Sep 17 00:00:00 2001 From: ueno Date: Tue, 15 Aug 2000 06:16:24 +0000 Subject: [PATCH] Fix docstring. --- net-trans.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/net-trans.el b/net-trans.el index a3abf93..6a905bd 100644 --- a/net-trans.el +++ b/net-trans.el @@ -54,13 +54,13 @@ (|| net-transaction-compose-||))) (defun net-transaction-compose-&& (left right) - "Multiplicative operator of current transaction LEFT and RIGHT." + "Multiplicative combinator which composes LEFT and RIGHT operations." `(lambda (trans) (let ((next (funcall #',left trans))) (funcall #',right next)))) (defun net-transaction-compose-|| (left right) - "Additive operator of current transaction LEFT and RIGHT." + "Additive combinator which composes LEFT and RIGHT operations." `(lambda (trans) (let (next error) (setq error -- 1.7.10.4