Here is how I fixed it. Thanks.
-Ryan
get-news-date: func [
date-str [string!] "One of the above date strings"
][
date-str: any [find/tail date-str ", " date-str]
to-date date-str
]
get-news-date2: func [
date-str [string!] "One of the above date strings"
][
date-str: any [find/tail date-str " " date-str]
to-date date-str
]
dateline: fields ;-fields is defined elsewhere
if error? try [message-date: get-news-date dateline] [message-date:
get-news-date2 dateline]
> Opps, sorry. I think the problem is the "Date: " portion of the
> third date string type. This oughta do:
>
> get-news-date: func [
> date-str [string!] "One of the above date strings"
> ][
> date-str: any [
> find/tail date-str ", "
> find/tail date-str "Date: "
> date-str
> ]
> to-date date-str
> ]
