Enable use of current desktop as default

When asking the user for a desktop it is now easy to specify that the
default should be the current desktop.

- desktop-registry.el (desktop-registry-current-desktop): Add optional
  DEFAULT parameter which specifies the return value when
  `desktop-dirname' is `nil', instead of previously an empty string.

  (desktop-registry--completing-read): Add optional DEFAULT-CURRENT
  parameter which specifies that the current desktop should be the
  default when asking for a desktop.

  (desktop-registry-remove-desktop): (desktop-registry-rename-desktop):
  Use the current desktop as default when asking the user to select a
  desktop.

1 files changed, 1 insertions, 1 deletions

diff --git a/README.org b/README.org
index 04b7a78..545cf7b 100644
--- a/README.org
+++ b/README.org
@@ -40,5 +40,5 @@ to fix that.
    #+BEGIN_SRC emacs-lisp
      (add-to-list 'org-capture-templates
                   '("t" "Task" entry nil
-                    "* TODO %?  :%(desktop-registry-current-desktop):"))
+                    "* TODO %?  :%(desktop-registry-current-desktop \"\"):"))
    #+END_SRC