Commit eb344fcf92a099d0fecf01f106994c4454066ce9
1 parent
6923cbdd
make mail/tools.anubis to be transmitted to let get_rfc822_date_format to be vis…
…ible by compose_email.anubis source reader
Showing
1 changed file
with
1 additions
and
36 deletions
Show diff stats
mail/compose_email.anubis
| ... | ... | @@ -15,7 +15,7 @@ read system/logger.anubis |
| 15 | 15 | read system/data_io.anubis |
| 16 | 16 | read web/mime.anubis |
| 17 | 17 | //read calexium_lib/net_services_protocols/logger_service.anubis |
| 18 | -read calexium_lib/mail/tools.anubis | |
| 18 | +transmit calexium_lib/mail/tools.anubis | |
| 19 | 19 | read calexium_lib/mail/decode_mail.anubis |
| 20 | 20 | read calexium_lib/mail/encode_mail.anubis |
| 21 | 21 | read calexium_lib/mail/lexers/fqa.anubis |
| ... | ... | @@ -238,41 +238,6 @@ define String |
| 238 | 238 | } |
| 239 | 239 | . |
| 240 | 240 | |
| 241 | - | |
| 242 | - public define String | |
| 243 | - str_utime_send_mail | |
| 244 | - ( | |
| 245 | - UTime t | |
| 246 | - ) = | |
| 247 | - with date_send = convert_time(t.seconds), | |
| 248 | - if day_name(date_send.week_day) is | |
| 249 | - { | |
| 250 | - failure then "", | |
| 251 | - success(the_day_name) then the_day_name + ", " | |
| 252 | - }+ | |
| 253 | - date_send.day + " " + | |
| 254 | - if month_name(date_send.month) is | |
| 255 | - { | |
| 256 | - failure then to_decimal(date_send.month), | |
| 257 | - success(the_month_name) then the_month_name | |
| 258 | - }+ " " + | |
| 259 | - date_send.year + " " + | |
| 260 | - zero_pad_n(2, date_send.hour) + ":" + zero_pad_n(2, date_send.minute) + ":" + zero_pad_n(2, date_send.second) | |
| 261 | - //+ " +0000" | |
| 262 | - . | |
| 263 | - | |
| 264 | - public define String | |
| 265 | - get_rfc822_date_format | |
| 266 | - = | |
| 267 | - str_utime_send_mail(unow). | |
| 268 | - | |
| 269 | - if capture_shell_command("date", ["-R"]) is | |
| 270 | - { | |
| 271 | - failure then str_utime_send_mail(unow), | |
| 272 | - success(s) then | |
| 273 | - if split_lines(s) is [h . t] then h else str_utime_send_mail(unow) | |
| 274 | - }. | |
| 275 | - | |
| 276 | 241 | define Int |
| 277 | 242 | _next_ws_pos |
| 278 | 243 | ( | ... | ... |