diff options
| author |  Christian Hesse <mail@eworm.de> | 2023-09-15 22:50:32 +0200 |
|---|---|---|
| committer | Christian Hesse <mail@eworm.de> | 2023-09-18 07:55:05 +0200 |
| commit | 4ddc6be5859210e6a4c47699884f3fb67c3ed777 (patch) | |
| tree | aa29aabb858da2f970c26d30354e9858fe2cd5a4 /check-certificates.rsc | |
| parent | 557823c5c1c364d2d662069d4690640654fa1267 (diff) | |
global-functions: split off $FormatMultiLines ...
... to format multiple lines from an array.
Diffstat (limited to 'check-certificates.rsc')
| -rw-r--r-- | check-certificates.rsc | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/check-certificates.rsc b/check-certificates.rsc index 86e079a..3410d4d 100644 --- a/check-certificates.rsc +++ b/check-certificates.rsc @@ -78,6 +78,7 @@ :local CertVal $1; :global FormatLine; + :global FormatMultiLines; :global IfThenElse; :global ParseKeyValueStore; @@ -89,7 +90,7 @@ :return ( \ [ $FormatLine "Name" ($CertVal->"name") ] . "\n" . \ [ $IfThenElse ([ :len ($CertVal->"common-name") ] > 0) ([ $FormatLine "CommonName" ($CertVal->"common-name") ] . "\n") ] . \ - [ $IfThenElse ([ :len ($CertVal->"subject-alt-name") ] > 0) ([ $FormatLine "SubjectAltNames" ($CertVal->"subject-alt-name") ] . "\n") ] . \ + [ $IfThenElse ([ :len ($CertVal->"subject-alt-name") ] > 0) ([ $FormatMultiLines "SubjectAltNames" ($CertVal->"subject-alt-name") ] . "\n") ] . \ [ $FormatLine "Private key" [ $IfThenElse (($CertVal->"private-key") = true) "available" "missing" ] ] . "\n" . \ [ $FormatLine "Fingerprint" ($CertVal->"fingerprint") ] . "\n" . \ [ $FormatLine "Issuer" ($CertVal->"ca" . ([ $ParseKeyValueStore ($CertVal->"issuer") ]->"CN")) ] . "\n" . \ |