[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master c6585bb 47/76: Added autoloads
From: |
Ian Dunn |
Subject: |
[elpa] master c6585bb 47/76: Added autoloads |
Date: |
Thu, 23 Feb 2017 19:42:51 -0500 (EST) |
branch: master
commit c6585bb477ff62a02bc894a04bc1ee67a6b1ff3d
Author: Ian Dunn <address@hidden>
Commit: Ian Dunn <address@hidden>
Added autoloads
---
Makefile | 3 +++
lisp/Makefile | 7 ++++++-
lisp/enwc-setup.el | 2 +-
lisp/enwc.el | 43 +++++++++++++++++++++----------------------
4 files changed, 31 insertions(+), 24 deletions(-)
diff --git a/Makefile b/Makefile
index 81495bf..9c7fa1b 100644
--- a/Makefile
+++ b/Makefile
@@ -32,6 +32,9 @@ all: lisp
lisp:
$(MAKE) -C $(LISPDIR)
+autoloads:
+ $(MAKE) -C $(LISPDIR) enwc-autoloads.el
+
install:
install -m 644 $(ALLELC) $(SITELISP)
install -m 644 $(ALLSRC) $(SITELISP)
diff --git a/lisp/Makefile b/lisp/Makefile
index c3a0ad5..9e33203 100644
--- a/lisp/Makefile
+++ b/lisp/Makefile
@@ -28,8 +28,13 @@ all: $(TARGET)
%.elc: %.el
@$(EMACS) -q --batch \
- --eval "(add-to-list 'load-path \".\")" \
+ -L "." \
-f batch-byte-compile $<
+enwc-autoloads.el:
+ @$(EMACS) -q --batch \
+ --eval "(require 'package)" \
+ --eval "(package-generate-autoloads \"enwc\" \"$$(pwd)\")"
+
clean:
-rm -f *.elc
diff --git a/lisp/enwc-setup.el b/lisp/enwc-setup.el
index a3d0984..053b941 100644
--- a/lisp/enwc-setup.el
+++ b/lisp/enwc-setup.el
@@ -22,7 +22,6 @@
;; Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
;; 02110-1301, USA.
-
(require 'enwc)
(require 'enwc-wicd)
(require 'enwc-nm)
@@ -93,6 +92,7 @@
)
(funcall (intern (concat "enwc-" sym-name "-setup")))))
+;;;###autoload
(defun enwc-setup ()
"Sets up ENWC.
This setups ENWC and confirms that one of the backends can be found
diff --git a/lisp/enwc.el b/lisp/enwc.el
index 5308e2b..69c81d0 100644
--- a/lisp/enwc.el
+++ b/lisp/enwc.el
@@ -45,8 +45,7 @@
;;; Code:
-(eval-when-compile
- (require 'cl))
+(require 'cl-lib)
(defgroup enwc nil
"*The Emacs Network Client"
@@ -262,12 +261,12 @@ whether or not ENWC is in wired mode.")
(defun enwc-detail-to-ident (detail)
"Converts detail DETAIL to a constant identifier."
(case (intern detail)
- ((essid Ssid) "essid")
- ((bssid HwAddress) "bssid")
- ((quality Strength) "quality")
- ((encryption Flags) "encryption")
- ((mode Mode) "mode")
- ((channel Frequency) "channel")))
+ ((essid Ssid) "essid")
+ ((bssid HwAddress) "bssid")
+ ((quality Strength) "quality")
+ ((encryption Flags) "encryption")
+ ((mode Mode) "mode")
+ ((channel Frequency) "channel")))
;;;;;;;;;;;;;;;;;;;;
;; ENWC functions
@@ -314,7 +313,9 @@ network with id ID."
(defun enwc-wireless-connect (id)
"Begins a connection to wireless network with
id ID."
- (funcall enwc-wireless-connect-func id))
+ (funcall enwc-wireless-connect-func id)
+ ;; (run-hooks 'enwc-on-connected-hook)
+ )
(defun enwc-wireless-disconnect ()
"Disconnects the wireless."
@@ -412,7 +413,7 @@ If no network is connected, then prints 0%.
If wired is active, then prints 100%.
If ENWC is in the process of connecting, then prints *%.
This is initiated during setup, and runs once every second."
- (let ((cur-id (enwc-get-current-nw-id))
+ (let ((cur-id (enwc-get-current-nw-id))
(conn (enwc-check-connecting-p))
str)
(setq str
@@ -486,7 +487,7 @@ the scan results."
(setq enwc-essid-width (1+ enwc-essid-width))
(setq enwc-scan-done t)
(if enwc-scan-interactive
- (enwc-display-wireless-networks enwc-last-scan))))
+ (enwc-display-wireless-networks enwc-last-scan))))
(defun enwc-scan-internal-wired ()
"The scanning routine for a wired connection.
@@ -541,7 +542,7 @@ ENT is the entry, and WIDTH is the column width."
NETWORKS must be in the format returned by
`enwc-scan-internal-wireless'."
(if (not (eq major-mode 'enwc-mode))
- (enwc-setup-buffer))
+ (enwc-setup-buffer))
(if (not (listp networks))
(error "NETWORKS must be a list of association lists."))
(let ((cur-id (enwc-get-current-nw-id))
@@ -590,6 +591,7 @@ functions, and checks whether or not ENWC is using wired."
(enwc-display-wired-networks networks)
(enwc-display-wireless-networks networks)))
+;;;###autoload
(defun enwc-scan ()
"The frontend of the scanning routine. Sets up and moves to
the ENWC buffer if necessary, and scans and displays the networks."
@@ -605,6 +607,7 @@ the ENWC buffer if necessary, and scans and displays the
networks."
(forward-line))
(enwc-scan-internal)))))
+;;;###autoload
(defun enwc-find-network (essid &optional networks)
"Checks through NETWORKS for the network with essid ESSID,
and returns the network identifier. Uses `enwc-last-scan' if
@@ -651,8 +654,9 @@ and checks whether or not ENWC is using wired."
(enwc-wireless-connect id)
(if enwc-last-scan
(setq cur-net (cdr (assoc "essid" (nth id enwc-last-scan)))))
- cur-net)))
+ cur-net)))
+;;;###autoload
(defun enwc-connect-to-network (net-id)
"Connects the the network with network id NET-ID.
Confirms that NET-ID is a valid network id.
@@ -667,6 +671,7 @@ This calls `enwc-connect-network' as a subroutine."
(setq cur-net (enwc-connect-network net-id))
(message (concat "Connecting to " cur-net))))
+;;;###autoload
(defun enwc-connect-to-network-essid (essid)
"Connects to the network with essid ESSID."
(interactive "sNetwork ESSID: ")
@@ -704,6 +709,7 @@ This function also sets the variable `enwc-using-wired'."
(setq enwc-using-wired (not enwc-using-wired))
(enwc-scan)))
+;;;###autoload
(defun enwc ()
"The main front-end to ENWC.
This sets up the buffer and scans for networks.
@@ -944,9 +950,7 @@ and redisplays the settings from the network profile
(define-derived-mode enwc-mode tabulated-list-mode "enwc"
"Mode for working with network connections.
\\{enwc-mode-map}"
- ;;(setq buffer-read-only t)
- (add-hook 'tabulated-list-revert-hook 'enwc-scan nil t)
- )
+ (add-hook 'tabulated-list-revert-hook 'enwc-scan nil t))
(defun enwc-setup-buffer ()
"Sets up the ENWC buffer.
@@ -954,12 +958,7 @@ This first checks to see that it exists,
and if it doesn't, then create it."
(if (not (get-buffer "*ENWC*"))
(with-current-buffer (get-buffer-create "*ENWC*")
- ;;(use-local-map enwc-mode-map)
- ;;(setq major-mode 'enwc-mode
- ;; mode-name "enwc")
- (enwc-mode)
- ;;(setq buffer-read-only t)
- ))
+ (enwc-mode)))
(switch-to-buffer "*ENWC*"))
(provide 'enwc)
- [elpa] master cb32122 13/76: (enwc-nm-prop-to-prop, enwc-wicd-prop-to-prop): Convert the properties used internally to the property names used externally., (continued)
- [elpa] master cb32122 13/76: (enwc-nm-prop-to-prop, enwc-wicd-prop-to-prop): Convert the properties used internally to the property names used externally., Ian Dunn, 2017/02/23
- [elpa] master d6bee52 32/76: (enwc-wicd.el): Fixed opening header., Ian Dunn, 2017/02/23
- [elpa] master 5088938 40/76: Removed erroneous comment., Ian Dunn, 2017/02/23
- [elpa] master 17f27c6 18/76: (enwc-nm-prop-to-prop, enwc-nm-get-sec-types): Removed., Ian Dunn, 2017/02/23
- [elpa] master ee90297 31/76: (enwc-nm.el): Fixed several docstrings, and file header., Ian Dunn, 2017/02/23
- [elpa] master 4e0d5a2 41/76: Cosmetic changes., Ian Dunn, 2017/02/23
- [elpa] master 8f21449 45/76: Removed tag 2.0, Ian Dunn, 2017/02/23
- [elpa] master ec0539b 42/76: Fixed enwc-setup to be able to be called more than once., Ian Dunn, 2017/02/23
- [elpa] master 5c63470 48/76: Fixed autoloads generation and added hgignore., Ian Dunn, 2017/02/23
- [elpa] master 43c98da 50/76: Changed enwc-last-scan to a hashtable., Ian Dunn, 2017/02/23
- [elpa] master c6585bb 47/76: Added autoloads,
Ian Dunn <=
- [elpa] master 48e7aa4 55/76: Updated Makefile, Ian Dunn, 2017/02/23
- [elpa] master 2e07c3a 54/76: Began work on WPA backend. EXPERIMENTAL!, Ian Dunn, 2017/02/23
- [elpa] master ba6061b 51/76: Created more robust backend system., Ian Dunn, 2017/02/23
- [elpa] master ad38333 59/76: Cleaned up enwc-refresh-widths and changed enwc-details-list to enwc-column-specs., Ian Dunn, 2017/02/23
- [elpa] master a46fe3c 64/76: Don't switch to the ENWC buffer when processing a scan., Ian Dunn, 2017/02/23
- [elpa] master 33515f8 66/76: Silenced byte-compiler., Ian Dunn, 2017/02/23
- [elpa] master bcb33e6 30/76: (enwc-get-networks): Improved docstring., Ian Dunn, 2017/02/23
- [elpa] master 245a82f 52/76: Moved Wicd and NetworkManager backends to new system., Ian Dunn, 2017/02/23
- [elpa] master 3b1bbc6 69/76: Fixed autoloads target in Makefile, Ian Dunn, 2017/02/23
- [elpa] master 8c17c8c 73/76: Updated hgignore to ignore elc files in top-level directory., Ian Dunn, 2017/02/23