Improve proxy functions.

seagle0128 · Aug 21, 2019 · 33bd0de · 33bd0de
1 parent 1657063
commit 33bd0de
Showing 1 changed file with 7 additions and 6 deletions.
diff --git a/lisp/init-funcs.el b/lisp/init-funcs.el
@@ -276,22 +276,23 @@
 (defun proxy-socks-enable ()
   "Enable SOCKS proxy."
   (interactive)
-  (setq url-gateway-method 'socks)
-  (setq socks-noproxy '("localhost"))
-  (setq socks-server '("Default server" "127.0.0.1" 1086 5))
+  (require 'socks)
+  (setq url-gateway-method 'socks
+        socks-noproxy '("localhost")
+        socks-server '("Default server" "127.0.0.1" 1086 5))
   (proxy-socks-show))
 
 (defun proxy-socks-disable ()
   "Disable SOCKS proxy."
   (interactive)
-  (setq url-gateway-method 'native)
-  (setq socks-noproxy nil)
+  (setq url-gateway-method 'native
+        socks-noproxy nil)
   (proxy-socks-show))
 
 (defun proxy-socks-toggle ()
   "Toggle SOCKS proxy."
   (interactive)
-  (if socks-noproxy
+  (if (bound-and-true-p socks-noproxy)
       (proxy-socks-disable)
     (proxy-socks-enable)))