------------------------------------------------------------
revno: 306
committer: Stefan Monnier <monn...@iro.umontreal.ca>
branch nick: elpa
timestamp: Thu 2012-11-29 12:06:38 -0500
message:
* packages/ampc/ampc.el: Add proper file trailer.
modified:
packages/ampc/ampc.el
=== modified file 'packages/ampc/ampc.el'
--- a/packages/ampc/ampc.el 2012-08-06 07:06:26 +0000
+++ b/packages/ampc/ampc.el 2012-11-29 17:06:38 +0000
@@ -31,7 +31,7 @@
;;; ** installation
;; If you use GNU ELPA, install ampc via M-x package-list-packages RET or
;; (package-install 'ampc). Otherwise, grab the files in this repository and
-;; put the emacs lisp ones somewhere in your load-path or add the directory the
+;; put the Emacs Lisp ones somewhere in your load-path or add the directory the
;; files are in to it, e.g.:
;;
;; (add-to-list 'load-path "~/.emacs.d/ampc")
@@ -363,7 +363,7 @@
"List of MPD commands that should be executed synchronously.
Executing commands that print lots of output synchronously will
result in massive performance improvements of ampc. If the car
-of this list is `t', execute all commands synchronously other
+of this list is t, execute all commands synchronously other
than the ones specified by the rest of the list."
:type '(repeat symbol))
@@ -3062,7 +3062,7 @@
;;;###autoload
(defun ampc (&optional host port suspend)
- "ampc is an asynchronous client for the MPD media player.
+ "Ampc is an asynchronous client for the MPD media player.
This function is the main entry point for ampc.
HOST and PORT specify the MPD instance to connect to. The values
@@ -3076,9 +3076,9 @@
(unless port
(setf port (or (cdr ampc-default-server) (read-string "Port: "))))
(when (and ampc-connection
- (or (not (equal host ampc-host))
- (not (equal port ampc-port))
- (not (ampc-on-p))))
+ (not (and (equal host ampc-host)
+ (equal port ampc-port)
+ (ampc-on-p))))
(ampc-quit))
(unless ampc-connection
(let ((connection (open-network-stream "ampc"
@@ -3115,3 +3115,4 @@
;; fill-column: 80
;; indent-tabs-mode: nil
;; End:
+;;; ampc.el ends here
