summaryrefslogtreecommitdiff
path: root/libmu_scm
diff options
context:
space:
mode:
authorSergey Poznyakoff <gray@gnu.org.ua>2002-01-15 22:13:21 +0000
committerSergey Poznyakoff <gray@gnu.org.ua>2002-01-15 22:13:21 +0000
commit678d86a43492caf6f82b7068ff28d0f172d59bec (patch)
tree8918baa85478039eee7983323bdc61aa60c1d6e7 /libmu_scm
parent2964364a80a9e88b8e99cfb3456a048da54de055 (diff)
downloadmailutils-678d86a43492caf6f82b7068ff28d0f172d59bec.tar.gz
mailutils-678d86a43492caf6f82b7068ff28d0f172d59bec.tar.bz2
(mu_scm_mime_print) Added missing return value.
Diffstat (limited to 'libmu_scm')
-rw-r--r--libmu_scm/mu_mime.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/libmu_scm/mu_mime.c b/libmu_scm/mu_mime.c
index e75a57b1c..18ef0132f 100644
--- a/libmu_scm/mu_mime.c
+++ b/libmu_scm/mu_mime.c
@@ -55,6 +55,8 @@ mu_scm_mime_print (SCM mime_smob, SCM port, scm_print_state * pstate)
scm_puts ("#<mime ", port);
scm_intprint (nparts, 10, port);
scm_putc ('>', port);
+
+ return 1;
}
/* Internal calls: */
@@ -125,8 +127,6 @@ SCM_DEFINE (mu_mime_multipart_p, "mu-mime-multipart?", 1, 0, 0,
"Returns #t if MIME is a multipart object.\n")
#define FUNC_NAME s_mu_mime_multipart_p
{
- mime_t mime;
-
SCM_ASSERT (mu_scm_is_mime (MIME), MIME, SCM_ARG1, FUNC_NAME);
return mime_is_multipart (mu_scm_mime_get (MIME)) ? SCM_BOOL_T : SCM_BOOL_F;
}

Return to:

Send suggestions and report system problems to the System administrator.