diff options
author | Ye Wenbin <wenbinye@gmail.com> | 2007-05-21 07:00:00 +0000 |
---|---|---|
committer | Ye Wenbin <wenbinye@gmail.com> | 2007-05-21 07:00:00 +0000 |
commit | 8b3c65357e684ae794b5c488c927a093e6d6967a (patch) | |
tree | b188357e3fbde462ffe28144f305ff756a19f5ab | |
parent | a9b3bfea81e3edc625152051d32417ef3e194b11 (diff) |
add document for some commands
darcs-hash:20070521070049-94065-36a4faaa4118198646a8131ee8ffd5776fd7eadd.gz
-rw-r--r-- | emms-tag-editor.el | 13 |
1 files changed, 10 insertions, 3 deletions
diff --git a/emms-tag-editor.el b/emms-tag-editor.el index bb5c327..09cc57f 100644 --- a/emms-tag-editor.el +++ b/emms-tag-editor.el @@ -252,7 +252,9 @@ See also `emms-tag-editor-tag-file' and `emms-tag-editor-tag-ogg'. (defun emms-tag-editor-set-all (tag value) "Replace all track's TAG to VALUE. If turn transient-mark-mode on, -you can apply the command to a selected region." +you can apply the command to a selected region. If +`transient-mark-mode' is on andthe mark is activate, the changes +will only take on the tracks in the region." (interactive (list (completing-read "Set tag: " emms-tag-editor-tags nil t) @@ -268,8 +270,10 @@ you can apply the command to a selected region." (insert value))))) (defun emms-tag-editor-replace-in-tag (tag from to) - "Query and replace text in selected TAG. For example, select tag -info-title, then replace will only occur in title." + "Query and replace text in selected TAG. For example, select +tag info-title, then replace will only occur in title. If +`transient-mark-mode' is on andthe mark is activate, the changes +will only take on the tracks in the region." (interactive (cons (completing-read "Replace in tag: " emms-tag-editor-tags nil t) @@ -309,6 +313,9 @@ info-title, then replace will only occur in title." (delete-overlay overlay)))) (defun emms-tag-editor-transpose-tag (tag1 tag2) + "Transpose value of TAG1 and TAG2. If `transient-mark-mode' is +on andthe mark is activate, the changes will only take on the +tracks in the region." (interactive (let* ((tag1 (intern (completing-read "Tag1: " emms-tag-editor-tags nil t))) |