Update copyright year to 2015

[gnu-emacs] / lisp / org / org-archive.el

diff --git a/lisp/org/org-archive.el b/lisp/org/org-archive.el
index 6deac47ba8eb3c65da9834d4c582a717bfc18fe4..2637623abba7eb115277fd73d9be367cbaee4ed0 100644 (file)
--- a/lisp/org/org-archive.el
+++ b/lisp/org/org-archive.el
@@ -1,6 +1,6 @@
 ;;; org-archive.el --- Archiving for Org-mode
 
-;; Copyright (C) 2004-2014 Free Software Foundation, Inc.
+;; Copyright (C) 2004-2015 Free Software Foundation, Inc.
 
 ;; Author: Carsten Dominik <carsten at orgmode dot org>
 ;; Keywords: outlines, hypermedia, calendar, wp
@@ -231,8 +231,7 @@ this heading."
                       (error "No file associated to buffer"))))
            (olpath (mapconcat 'identity (org-get-outline-path) "/"))
            (time (format-time-string
-                  (substring (cdr org-time-stamp-formats) 1 -1)
-                  (current-time)))
+                  (substring (cdr org-time-stamp-formats) 1 -1)))
            category todo priority ltags itags atags
            ;; end of variables that will be used for saving context
            location afile heading buffer level newfile-p infile-p visiting
@@ -441,8 +440,7 @@ sibling does not exist, it will be created at the end of the subtree."
        (org-set-property
         "ARCHIVE_TIME"
         (format-time-string
-         (substring (cdr org-time-stamp-formats) 1 -1)
-         (current-time)))
+         (substring (cdr org-time-stamp-formats) 1 -1)))
        (outline-up-heading 1 t)
        (hide-subtree)
        (org-cycle-show-empty-lines 'folded)