diff options
author | Sergey Poznyakoff <gray@gnu.org.ua> | 2002-01-15 22:13:21 +0000 |
---|---|---|
committer | Sergey Poznyakoff <gray@gnu.org.ua> | 2002-01-15 22:13:21 +0000 |
commit | 678d86a43492caf6f82b7068ff28d0f172d59bec (patch) | |
tree | 8918baa85478039eee7983323bdc61aa60c1d6e7 /libmu_scm | |
parent | 2964364a80a9e88b8e99cfb3456a048da54de055 (diff) | |
download | mailutils-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.c | 4 |
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; } |