Bug 46631

Альтератор (acc) с модулем брандмауэр (alterator-net-iptables) падает, если перечисление портов в поле "Дополнительные порты" осуществлено через запятую. Программа падает сразу при применении изменений. Пример: 8610,8612

Дистрибутив:
NAME="starter kit"
VERSION="10"
ID=altlinux
VERSION_ID=10
PRETTY_NAME="ALT Starterkit 10 (Hypericum)"


Вывод в терминале:
WARNING: (alterator lookout evaluation): imported module (alterator presentation events) overrides core binding `when'
Backtrace:
          17 (primitive-load "/usr/sbin/acc")
In ice-9/boot-9.scm:
    841:4 16 (with-throw-handler _ _ _)
In interfaces/guile/exit-handler.scm:
     17:6 15 (_)
In interfaces/guile/transport/pipe-channel.scm:
    13:24 14 (process-incoming #<procedure 55dfe3c3f180 at interfac…> …)
In interfaces/guile/lookout.scm:
    94:17 13 (_ _ _)
     82:8 12 (lookout-main _ _ _ . _)
     36:2 11 (auth-permission-denied _ . _)
    45:37 10 (_)
In interfaces/guile/lookout/root.scm:
     22:2  9 (start-loop _ #<procedure 55dfe3c91940 at interfaces/gu…>)
In interfaces/guile/session/loop.scm:
    80:25  8 (_ _ #<procedure 55dfe3c91940 at interfaces/guile/objec…>)
In interfaces/guile/presentation/container.scm:
   212:44  7 (_ _ _)
In ice-9/eval.scm:
    619:8  6 (_ #(#(#<directory (alterator lookout evaluation) 5…> …)))
In ice-9/boot-9.scm:
    829:9  5 (catch woo-error #<procedure 55dfe3a30d00 at ice-9/eva…> …)
In interfaces/guile/d.scm:
   162:10  4 (_ (("/net-iptables" language ("ru_RU") action "wr…" …)) …)
In srfi/srfi-1.scm:
   679:15  3 (append-map _ _ . _)
   592:17  2 (map1 (("/net-iptables" language ("ru_RU") action "…" …)))
In unknown file:
           1 (request-unix-server "/var/run/alteratord/.socket" "(\…" …)
In ice-9/boot-9.scm:
   751:25  0 (dispatch-exception 1 type-error ((("opened_tcp_…" . #))))

ice-9/boot-9.scm:751:25: In procedure dispatch-exception:
Throw to key `type-error' with args `((("opened_tcp_ports" . "недопустимый порт TCP")))'.