anchor.diff:                    url)
               (download-arguments url target-dir))))
   
  -(defun download (url &optional target-dir)
  +(defun download-and-notify (url &optional target-dir)
     "Download asynchronously and notify on success or failure."
     (handler-case
         (progn
  
positive.code: (uiop:define-package :next/video        ; TODO: Rename file to video.lisp since there is no mode?
      (:use :common-lisp :next)
    (:export :download
             :download-arguments
             :*download-program*
             :*download-args*
  
negative.code:            :*preferred-download-directories*)
    (:documentation "Download videos on the Web.
  
  Command defined in this package: `download-and-notify'.
  
  It tries by default to use the program `youtube-dl', that you must
  have in your path.
  
  You can also write a new function that takes a URL as parameter, and
  bind it to `next/video:*download-function*'.  In doing so, you can
  rely on the `next/video:download-and-notify' function, that does error handling
  and process management.
  
  ***********************************************************************
  