Commits

youngs  committed 5a42391

Martin's Monster Mega typo patch

  • Participants
  • Parent commits 5da1721

Comments (0)

Files changed (2)

+2000-10-05  Martin Buchholz  <martin@xemacs.org>
+
+	* *: Mega typo fix.
+
 2000-08-22  Steve Youngs  <youngs@xemacs.org>
 
 	* Makefile (EXTRA_OBJS): New variable.
 1999-05-12  Stephen Tse  <stephent@sfu.ca>
 
 	* version 0.1 released.
-	
+	
 (defun eicq-hex-bin (hex)
   "Return a binary string from a hex string HEX.
 It ignores all non-lower letter hex characters, which makes reading string
-from `eicq-bin-pretty-hex' and netwrok debug convenient.  If the length of
+from `eicq-bin-pretty-hex' and network debug convenient.  If the length of
 HEX is odd, ?0 is appended to its end."
   (interactive "sHex: ")
   (setq hex (downcase hex))
 (defvar eicq-trimmed-packet nil
   "*Last incomplete packet.
 Due to limited buffer size of Emacs network buffer, packets can be trimmed
-and attached at the begining of next callback.  Use this in
-`eicq-network-separator' to concatenate a packet arcoss two callbacks.
+and attached at the beginning of next callback.  Use this in
+`eicq-network-separator' to concatenate a packet across two callbacks.
 Usually only one per 1000 packets needs this.")
 
 (defvar eicq-trimmed-packet-counter 0
 
 (defun eicq-pack-keep-alive-1 ()
   "Pack another keep alive packet 051e.
-Obseleted. Not used in v5."
+Obsoleted. Not used in v5."
   (eicq-pack "\x1e\x05"))
 
 (defun eicq-pack-logout ()
 (defun eicq-pack-info-request (alias)
   "Pack info request packet 0460.
 ALIAS is the alias/uin to query info for.
-Obseleted. Use meta user instead."
+Obsoleted. Use meta user instead."
   (eicq-pack
    "\x60\x04"
    (eicq-alias-bin alias)))
 (defun eicq-pack-info-ext-request (alias)
   "Pack extended info request packet 046a.
 ALIAS is the alias/uin to query info for.
-Obseleted. Use meta user instead."
+Obsoleted. Use meta user instead."
   (eicq-pack
    "\x6a\x04"
    (eicq-alias-bin alias)))
 
 (defun eicq-pack-update-info (nick-name first-name last-name email)
   "Pack update info packet 050a.
-Obselete. Use meta user command instead."
+Obsolete. Use meta user command instead."
   (eicq-pack
    "\x0a\x05"
    (eicq-int-bin (1+ (length nick-name)))
 (defun eicq-pack-update-info-ext
   (city country-code state age sex phone homepage about)
   "Pack update extended info packet 04b0.
-Obselete. Use meta user command instead."
+Obsolete. Use meta user command instead."
   (eicq-pack
    "\xb0\x04"
    (eicq-int-bin (1+ (length city)))
 
 (defun eicq-pack-send-message-to-foreigner ()
   "Pack send message to foreigner packet 0456.
-Foreginer is someone not on my contact list.
+Foreigner is someone not on my contact list.
 Also used to request permission to add someone
 with 'authorized' status to my contact list."
   (eicq-pack "\x56\x04"))
 
-;; protocol v2-specific (obseleted)
+;; protocol v2-specific (obsoleted)
 ;; - update info 04a6 \xa6\x04
 ;; - update extended info 04b0 \xb0\x04
 ;; - login 1 044c \x4c\x04
   "Dispatch server packet to registered handler.
 See `eicq-do-alist'.
 PACKET is a binary string.
-Non-nil NO-ACK means no acknowlegement packet will be sent."
+Non-nil NO-ACK means no acknowledgement packet will be sent."
   (let* ((void-ack-commands '("\x0a\x00" "\xf0\x00" "\x28\x00"))
          (version (if (> (length packet) 2) (substring packet 0 2)))
          command seq-num handler)
 :icq 123456 the hatter :unreal")
 
 (defun eicq-world-update ()
-  "Read `eicq-world-rc-filename' and update various user varibales.
+  "Read `eicq-world-rc-filename' and update various user variables.
 Need to call this whenever RC is modified and to be updated.
 RC file is not closed if it is the buffer of current window or it is modified."
   (interactive)
                  (not (y-or-n-p "Send a blank message? ")))
       (eicq-process-alias-input 'aliases)
 
-      ;; appply encode only TEXT portion of packet
+      ;; apply encode only TEXT portion of packet
       (loop for x in (eicq-spliter message)
         do (eicq-send-message-helper
             ;; encoding outgoing but not that to be insert in log buffer
   (eicq-send (eicq-pack-search-random-user group)))
 
 (defun eicq-set-random-group (group)
-  "Set ranodm user GROUP."
+  "Set random user GROUP."
   (interactive
    (list (eicq-completing-read
           "Random group: "
 
 (defun eicq-log-mark-unread (&optional mark-region)
   "Mark log message around point as unread.
-Non-nil MARK-REGION or prefix arugment means marks all log in the region."
+Non-nil MARK-REGION or prefix argument means marks all log in the region."
   (interactive "P")
   (if mark-region
       (eicq-log-mark-region (region-beginning) (region-end) 'unread)
 
 (defun eicq-log-mark-read (&optional mark-region)
   "Mark log message around point as read.
-Non-nil MARK-REGION or prefix arugment means marks all log in the region."
+Non-nil MARK-REGION or prefix argument means marks all log in the region."
   (interactive "P")
   (if mark-region
       (eicq-log-mark-region (region-beginning) (region-end) 'read)
 
 (defun eicq-forward-message-around (&optional no-header)
   "Forward message around
-Non-nil NO-HEADER means avoid perfixing message with original sender's
+Non-nil NO-HEADER means avoid prefixing message with original sender's
 info.
 ALIASES is a list of aliases/uin to send to.