diff options
| author | Arun Isaac | 2017-02-21 23:17:52 +0530 |
|---|---|---|
| committer | Arun Isaac | 2017-02-21 23:17:52 +0530 |
| commit | 245b1bffa6c325d6276ead70303472a60f0a17c5 (patch) | |
| tree | 8795979b94fd6acd65b28ad2f58a7e704c7f429e /el-exiftool.el | |
| parent | dc8170f6784d3129ec31a50b00ec7d1e2671136a (diff) | |
| download | exiftool.el-245b1bffa6c325d6276ead70303472a60f0a17c5.tar.gz exiftool.el-245b1bffa6c325d6276ead70303472a60f0a17c5.tar.lz exiftool.el-245b1bffa6c325d6276ead70303472a60f0a17c5.zip | |
Improve formatting.
* el-exiftool.el (el-exiftool-run): Format docstring so that first
line stands on its own.
(el-exiftool-command): Format docstring so that first line stands on
its own.
(el-exiftool-read): Format docstring so that first line stands on its
own.
Apropos only displays the first line of the docstring. Hence the first
line must stand on its own.
Diffstat (limited to 'el-exiftool.el')
| -rw-r--r-- | el-exiftool.el | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/el-exiftool.el b/el-exiftool.el index d72022f..789269c 100644 --- a/el-exiftool.el +++ b/el-exiftool.el @@ -27,19 +27,20 @@ response)) (defun el-exiftool-run () - "Start an exiftool process if not already running. If an exiftool -process is already running, delete it, and create a new one. Return -the process object of the newly created process." + "Start an exiftool process if one is not already running. +If an exiftool process is already running, delete it, and create +a new one. Return the process object of the newly created +process." (when-let (exiftool (get-process "exiftool")) (delete-process exiftool)) (start-process "exiftool" "exiftool" "exiftool" "-stay_open" "True" "-@" "-")) (let ((tq (tq-create (el-exiftool-run)))) (defun el-exiftool-command (&rest args) - "Execute a command in the currently running exiftool process. If -there is no running exiftool process, a new one will be created. ARGS -are arguments of the command to be run, as provided to the exiftool -command line application." + "Execute a command in the currently running exiftool process. +If there is no running exiftool process, a new one will be +created. ARGS are arguments of the command to be run, as provided +to the exiftool command line application." (string-trim (let ((suffix "{ready}\n")) (string-remove-suffix @@ -49,8 +50,7 @@ command line application." suffix)))))) (defun el-exiftool-read (file &rest tags) - "Read TAGs from FILE, and return an alist mapping tag names to -corresponding values. + "Read TAGs from FILE, and return an alist mapping tag names to corresponding values. \(fn FILE TAG...)" (mapcar |