[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master c8a0397 29/76: Fixed some compilation errors in enwc.el.
From: |
Ian Dunn |
Subject: |
[elpa] master c8a0397 29/76: Fixed some compilation errors in enwc.el. |
Date: |
Thu, 23 Feb 2017 19:42:48 -0500 (EST) |
branch: master
commit c8a0397cc50f49e0db23b1ac65581566bce1f4c7
Author: Ian D <address@hidden>
Commit: Ian D <address@hidden>
Fixed some compilation errors in enwc.el.
---
lisp/enwc.el | 45 +++++++++++++++++++++++----------------------
1 file changed, 23 insertions(+), 22 deletions(-)
diff --git a/lisp/enwc.el b/lisp/enwc.el
index ec54086..669360c 100644
--- a/lisp/enwc.el
+++ b/lisp/enwc.el
@@ -239,30 +239,31 @@ This is only used internally.")
"The face for the connected network."
:group 'enwc)
-(defun enwc--break-by-words (str)
- "Break up string STR into a list of words."
- (cl-check-type str string)
- (split-string str "-\\|_\\| "))
-
-(defun enwc--sym-to-str (sym &optional seps)
- "Create a string from symbol SYM.
+(eval-when-compile
+ (defun enwc--break-by-words (str)
+ "Break up string STR into a list of words."
+ (cl-check-type str string)
+ (split-string str "-\\|_\\| "))
+
+ (defun enwc--sym-to-str (sym &optional seps)
+ "Create a string from symbol SYM.
SEPS is a string specifying the separator to use to combine the words,
or \" \" if not specified."
- (cl-check-type sym symbol)
- (unless seps
- (setq seps " "))
- (cl-check-type seps string)
- (combine-and-quote-strings (enwc--break-by-words (symbol-name sym)) seps))
-
-(defun enwc--str-to-sym (str &optional seps)
- "Create a symbol from the string STR.
+ (cl-check-type sym symbol)
+ (unless seps
+ (setq seps " "))
+ (cl-check-type seps string)
+ (combine-and-quote-strings (enwc--break-by-words (symbol-name sym)) seps))
+
+ (defun enwc--str-to-sym (str &optional seps)
+ "Create a symbol from the string STR.
This will break STR into words, and then put it back together separating
each word by SEPS, which defaults to \"-\"."
- (cl-check-type str string)
- (unless seps
- (setq seps "-"))
- (cl-check-type seps string)
- (intern (combine-and-quote-strings (enwc--break-by-words str) seps)))
+ (cl-check-type str string)
+ (unless seps
+ (setq seps "-"))
+ (cl-check-type seps string)
+ (intern (combine-and-quote-strings (enwc--break-by-words str) seps))))
(defun enwc--int-to-byte-list (n)
"Convert 32-bit integer N into a byte list."
@@ -274,7 +275,7 @@ each word by SEPS, which defaults to \"-\"."
(defun enwc--byte-list-to-int (bl)
"Convert byte list BL into a 32-bit integer."
- (cl-check-type n list)
+ (cl-check-type bl list)
(let ((ret 0))
(dolist (x bl ret)
(setq ret (logior (lsh ret 8) x)))))
@@ -631,7 +632,7 @@ Otherwise, it actually returns it."
need-break cur-net)
(while (and nets (not cur-net))
(setq cur-net (pop nets))
- (unless (string-equal (alist-get 'essid (cdr-safe cur-ent))
+ (unless (string-equal (alist-get 'essid (cdr-safe cur-net))
essid)
(setq cur-net nil)))
(if cur-net
- [elpa] master b8697fd 62/76: Added force parameter to `enwc-load-backend'., (continued)
- [elpa] master b8697fd 62/76: Added force parameter to `enwc-load-backend'., Ian Dunn, 2017/02/23
- [elpa] master 2ebc214 01/76: Changed timeout on enwc-wicd-get-wireless-network-property., Ian Dunn, 2017/02/23
- [elpa] master 18e4a3a 06/76: Updated copyright notices., Ian Dunn, 2017/02/23
- [elpa] master 0d92006 09/76: (enwc-update-mode-line): Forces the mode line to update when ENWC updates its current signal., Ian Dunn, 2017/02/23
- [elpa] master 742b67a 19/76: Removed several network manager functions., Ian Dunn, 2017/02/23
- [elpa] master 773cef6 24/76: (enwc-backend-symbol-list): New variable., Ian Dunn, 2017/02/23
- [elpa] master b5686da 17/76: (enwc-wicd-get-sec-types): Removed., Ian Dunn, 2017/02/23
- [elpa] master 7914c48 10/76: (enwc-format-mode-line-string, enwc-update-mode-line): Added the option to customize the information displayed in the mode line., Ian Dunn, 2017/02/23
- [elpa] master 59ca546 20/76: (enwc--str-to-sym): Fixed., Ian Dunn, 2017/02/23
- [elpa] master 1722c02 33/76: enwc-cm.el: Fixed up header and footer., Ian Dunn, 2017/02/23
- [elpa] master c8a0397 29/76: Fixed some compilation errors in enwc.el.,
Ian Dunn <=
- [elpa] master bb68ed5 37/76: Added ignore rules for byte compiled files., Ian Dunn, 2017/02/23
- [elpa] master 6ed7137 43/76: Fix adding to global-mode-string., Ian Dunn, 2017/02/23
- [elpa] master 968e6f0 46/76: Added tag 2.0 for changeset cc2f7aa4ed36, Ian Dunn, 2017/02/23
- [elpa] master 2d5def6 36/76: (*-function): Removed., Ian Dunn, 2017/02/23
- [elpa] master d9cbdb9 39/76: Added some section headers., Ian Dunn, 2017/02/23
- [elpa] master 03a5464 57/76: Changed channel to an integer., Ian Dunn, 2017/02/23
- [elpa] master a6b2b03 61/76: Removed tag 2.0, Ian Dunn, 2017/02/23
- [elpa] master 3491895 14/76: Cleaned up code and consolidated front-end functions., Ian Dunn, 2017/02/23
- [elpa] master 14bcaf4 67/76: Fixed bug with NetworkManager loading, Ian Dunn, 2017/02/23
- [elpa] master 4e43aaf 53/76: Moved editing commands to separate file., Ian Dunn, 2017/02/23