> -       (not (time-less-p (cl-subseq (nth 5 (file-attributes file)) 0 2)
> -                      (cl-subseq time 0 2)))))
> +       (not (time-less-p (org-time-convert-to-integer
> +                       (nth 5 (file-attributes file)))
> +                      (org-time-convert-to-integer time)))))

Instead of rounding the times to whole seconds, wouldn't it make more
sense to check that the difference is larger than 1s?


        Stefan


Reply via email to