1
0
mirror of https://codeberg.org/cage/tinmop/ synced 2025-06-05 01:09:17 +02:00

- changed db-nil-p

this function was transforming "no" and even 0.0 (floating point number) to nil.

That behaivour was incorrect for  numbers and probably not desiderable
for the  string no  (in fact  poll with "No"  option was  not rendered
beacause of this fact).

Removed conversion  for non- integer numbers  and prevented conversion
from some  kind of  non empty string  (like "nil" or  "no") via  a key
argument.
This commit is contained in:
cage
2021-01-23 15:40:51 +01:00
parent 6356331408
commit 3962af0256
4 changed files with 38 additions and 28 deletions

View File

@ -187,12 +187,12 @@
(loop for attachment in all-attachments do
(let ((type (db-utils:db-getf attachment
:type
(_ "unknown"))))
:default (_ "unknown"))))
(format stream
(_"type: ~a~%metadata~%~a~%address: ~a~2%")
(attachment-type->description type)
(attachment-type->metadata type attachment)
(db-utils:db-getf attachment :url (_ "unknown")))))))
(db-utils:db-getf attachment :url :default (_ "unknown")))))))
text))
(defgeneric message-original->text-body (object &key &allow-other-keys))