delete redundant crlf

sms.fnl

@@ -149,7 +149,7 @@
       (tx (.. "AT+CMGS=" (string.format "%d" (/ (# pdu) 2)) "\r\n"))
       (expect ">" "ERROR")
       (tx payload)
-      (tx "\026\r\n")
+      (tx "\026")
       (expect "OK"))))
 
 (fn new-sender [{: device : smsc : verbose}]
@@ -166,12 +166,12 @@
       (tcsetattr  0 termios)
       (tcdrain)
 
-      (command "AT")
-      (command "AT&F")                  ; revert to defaults
-      (command "ATE0")                  ; disable command echo
-      (command "AT+CMEE=1")              ;print CME errors
-      (command (.. "AT+CSCA=\"" smsc "\",145\r\n")) ;set SMSC
-      (command "AT+CMGF=0"))              ;SMS  PDU mode
+      (command "AT")                            ; hello ?
+      (command "AT&F")                          ; revert to defaults
+      (command "ATE0")                          ; disable command echo
+      (command "AT+CMEE=1")                     ; print CME errors
+      (command (.. "AT+CSCA=\"" smsc "\",145")) ; set SMSC
+      (command "AT+CMGF=0"))                    ; expect SMS data in PDU mode
 
     {:send send-message :device device :smsc smsc :fd fd}))