diff options
Diffstat (limited to 'emms.el')
| -rw-r--r-- | emms.el | 20 | 
1 files changed, 15 insertions, 5 deletions
@@ -463,6 +463,21 @@ whenever possible."    seq) +;;; Convenient macros + +(defmacro emms-with-inhibit-read-only-t (&rest body) +  "Simple wrapper around `inhibit-read-only'." +  `(let ((inhibit-read-only t)) +     ,@body)) +(put 'emms-with-inhibit-read-only-t 'edebug-form-spec '(body)) + +(defmacro emms-with-widened-buffer (&rest body) +  `(save-restriction +     (widen) +     ,@body)) +(put 'emms-with-widened-buffer 'edebug-form-spec '(body)) + +  ;;; Tracks  ;; This is a simple datatype to store track information. @@ -669,11 +684,6 @@ If no playlist exists, a new one is generated."  		   (point-max)))    (run-hooks 'emms-playlist-cleared-hook)) -(defmacro emms-with-widened-buffer (&rest body) -  `(save-restriction -     (widen) -     ,@body)) -  ;;; Point movement within the playlist buffer.  (defun emms-playlist-track-at (&optional pos)    "Return the track at POS (point if not given), or nil if none."  | 
