From c18b8a0fd8953853864b69d4884bfc6da3ed0215 Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Thu, 23 Feb 2017 00:49:21 +0530 Subject: Add headers and footers. * el-exiftool.el: Add headers and footers as per emacs lisp coding conventions. * el-exiftool-tests.el: Add headers and footers as per emacs lisp coding conventions. --- el-exiftool-tests.el | 19 +++++++++++++++++++ el-exiftool.el | 19 ++++++++++++++++++- 2 files changed, 37 insertions(+), 1 deletion(-) diff --git a/el-exiftool-tests.el b/el-exiftool-tests.el index 0dd0cc6..0025cf4 100644 --- a/el-exiftool-tests.el +++ b/el-exiftool-tests.el @@ -1,3 +1,12 @@ +;;; el-exiftool.el --- Elisp wrapper around exiftool ;; -*- lexical-binding: t -*- + +;; Elisp wrapper around exiftool +;; Copyright (C) 2017 by Arun I +;; +;; Author: Arun I +;; Keywords: data +;; Homepage: https://git.systemreboot.net/el-exiftool + ;; This file is part of el-exiftool. ;; el-exiftool is free software: you can redistribute it and/or modify @@ -13,6 +22,12 @@ ;; You should have received a copy of the GNU General Public License ;; along with el-exiftool. If not, see . +;;; Commentary: +;; +;; Unit testing for el-exiftool + +;;; Code: + (require 'el-exiftool) (require 'ert) @@ -26,3 +41,7 @@ (should (equal (el-exiftool-read temp-filename (caar tag-value-alist)) tag-value-alist)) (delete-file temp-filename)))) + +(provide 'el-exiftool-tests) + +;;; el-exiftool-tests.el ends here diff --git a/el-exiftool.el b/el-exiftool.el index 789269c..dd4081b 100644 --- a/el-exiftool.el +++ b/el-exiftool.el @@ -1,4 +1,11 @@ -;; -*- lexical-binding: t -*- +;;; el-exiftool.el --- Elisp wrapper around exiftool ;; -*- lexical-binding: t -*- + +;; Elisp wrapper around exiftool +;; Copyright (C) 2017 by Arun I +;; +;; Author: Arun I +;; Keywords: data +;; Homepage: https://git.systemreboot.net/el-exiftool ;; This file is part of el-exiftool. @@ -15,6 +22,14 @@ ;; You should have received a copy of the GNU General Public License ;; along with el-exiftool. If not, see . +;;; Commentary: +;; +;; el-exiftool is an elisp wrapper around exiftool. Exiftool supports +;; reading and writing metadata in various formats including EXIF, XMP +;; and IPTC. + +;;; Code: + (require 'subr-x) (require 'cl) @@ -89,3 +104,5 @@ The metadata to be written is specified as (TAG . VALUE) pairs. (list file)))) (provide 'el-exiftool) + +;;; el-exiftool.el ends here -- cgit v1.2.3