If you want to execute different logic for each case you can use "switch":
switch firstword [
"Path" [
clear fields
checker: false checker
]
"In-Reply-To" [
clear fields
checker: false checker
]
"Message-ID" [
clear fields
checker: false checker
]
]
It looks like you want to use the same logic, so I would search for the
value in a list:
if find [ "Path" "In-Reply-To" "Message-ID"
"References" "MIME-Version" "Content-Type" ] firstword [
clear fields
checker: false checker
]
-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]]
Sent: Friday, March 03, 2000 4:12 PM
To: [EMAIL PROTECTED]
Subject: [REBOL] if this or that, then action
Following is a segment of code that repeats an if statement over and over.
How can I simply this?
if firstword = "Path" [
clear fields
checker: false checker
]
if firstword = "In-Reply-To" [
clear fields
checker: false checker
]
if firstword = "Message-ID" [
clear fields
checker: false checker
]
if firstword = "References" [
clear fields
checker: false checker
]
if firstword = "MIME-Version" [
clear fields
checker: false checker
]
if firstword = "Content-Type" [
clear fields
checker: false checker
]
if firstword = "Lines" [
clear fields
checker: false checker
]
if firstword = "NNTP-Posting-Host" [
clear fields
checker: false checker
]
if firstword = "X-Trace" [
clear fields
checker: false checker
]
if firstword = "NNTP-Posting-Date" [
clear fields
checker: false checker
]
if firstword = "Organization" [
clear fields
checker: false checker
]
if firstword = "Xref" [
clear fields
checker: false checker
]
if firstword = "Followup-To" [
clear fields
checker: false checker
]
if firstword = "Content-Transfer-Encoding" [
clear fields
checker: false checker
]
if firstword = "X-Complaints-To" [
clear fields
checker: false checker
]
if firstword = "X-Mailer" [
clear fields
checker: false checker
]
if firstword = "X-Accept-Language" [
clear fields
checker: false checker
]
if firstword = "Reply-To" [
clear fields
checker: false checker
]
if firstword = "X-Newsreader" [
clear fields
checker: false checker
]
if firstword = "X-Priority" [
clear fields
checker: false checker
]
if firstword = "X-MSMail-Priority" [
clear fields
checker: false checker
]
if firstword = "X-MimeOLE" [
clear fields
checker: false checker
]
if firstword = "User-Agent" [
clear fields
checker: false checker
]
if firstword = "X-Abuse-to" [
clear fields
checker: false checker
]
if firstword = "X-Comments" [
clear fields
checker: false checker
]
if firstword = "X-Anon" [
clear fields
checker: false checker
]
if firstword = "X-Mail-To-News-Contact" [
clear fields
checker: false checker
]
if firstword = "X-Mimeole" [
clear fields
checker: false checker
]
if firstword = "X-Sender" [
clear fields
checker: false checker
]
if firstword = "X-Server-Date" [
clear fields
checker: false checker
]
if firstword = "X-MIMEOLE" [
clear fields
checker: false checker
]
if firstword = "X-Abuse-Info" [
clear fields
checker: false checker
]
if firstword = "X-Anon-1" [
clear fields
checker: false checker
]
if firstword = "X-Anon-2" [
clear fields
checker: false checker
]
if firstword = "X-No-Archive" [
clear fields
checker: false checker
]
if firstword = "Sender" [
clear fields
checker: false checker
]
