[elpa] master 20afe01 22/76: (enwc-wicd-save-nw-settings): Updated to work with new interface.

[Ian Dunn]

branch: master
commit 20afe01f3cd8d1a58f087f5825e687536952a098
Author: Ian D <address@hidden>
Commit: Ian D <address@hidden>

    (enwc-wicd-save-nw-settings): Updated to work with new interface.
---
 lisp/enwc-wicd.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/lisp/enwc-wicd.el b/lisp/enwc-wicd.el
index bcfff67..fc895a6 100644
--- a/lisp/enwc-wicd.el
+++ b/lisp/enwc-wicd.el
@@ -361,19 +361,19 @@ WIRED indicates whether this is a wired network."
 (defun enwc-wicd-save-nw-settings (id settings &optional wired)
   "Saves the settings indicated by the association list SETTINGS for
 the network with id ID."
-  (let ((enctype (cdr (assoc "enctype" settings))))
+  (let ((enctype (alist-get 'enctype settings "")))
 
     (enwc-wicd-set-nw-prop wired id "ip"
-                           (cdr (assoc "addr" settings)))
+                           (alist-get 'addr settings ""))
     (enwc-wicd-set-nw-prop wired id "netmask"
-                           (cdr (assoc "netmask" settings)))
+                           (alist-get 'netmask settings ""))
     (enwc-wicd-set-nw-prop wired id "gateway"
-                           (cdr (assoc "gateway" settings)))
+                           (alist-get 'gateway settings ""))
 
     (enwc-wicd-set-nw-prop wired id "dns1"
-                           (cdr (assoc "dns1" settings)))
+                           (alist-get 'dns1 settings ""))
     (enwc-wicd-set-nw-prop wired id "dns2"
-                           (cdr (assoc "dns2" settings)))
+                           (alist-get 'dns2 settings ""))
 
     (enwc-wicd-set-nw-prop wired id "enctype" enctype)
     (if (not (string= enctype "None"))