diff --git a/nongnu/packages/anydesk.scm b/nongnu/packages/anydesk.scm
index 27b6a48..caeb7f3 100644
--- a/nongnu/packages/anydesk.scm
+++ b/nongnu/packages/anydesk.scm
@@ -21,20 +21,20 @@
 (define-public anydesk
   (package
     (name "anydesk")
-    (version "6.3.0")
+    (version "6.3.2-1")
     (source (origin
               (method url-fetch)
-              (uri (string-append "https://download.anydesk.com/linux/anydesk-"
-                                  version "-amd64.tar.gz"))
+              (uri (string-append "https://download.anydesk.com/linux/anydesk_"
+                                  version "_amd64.deb"))
               (sha256
                (base32
-                "0lp4zvbdriwbzfnvblbbpzxsrs0l425rha9qjs9sy6ff6myk7qxi"))))
+                "13b5ab4a889vz39d36f45mhv3mlaxb305wsh3plk3dbjcrkkkirb"))))
     (build-system binary-build-system)
     (arguments
      `(#:validate-runpath? #f
        #:strip-binaries? #f             ;; For some reason it breaks the program
        #:patchelf-plan
-       `(("anydesk" ("atk"
+       `(("usr/bin/anydesk" ("atk"
                      "cairo"
                      "fontconfig"
                      "freetype"
@@ -66,17 +66,29 @@
                      "polkit-gnome"
                      "pulseaudio")))
        #:install-plan
-       `(("anydesk" "/bin/")
-         ("polkit-1/com.anydesk.anydesk.policy" "/etc/polkit-1/actions/")
-         ("icons/" "/share/icons/"))
+       `(("usr/bin/anydesk" "/bin/")
+         ("usr/share/polkit-1/actions/com.anydesk.anydesk.policy" "/etc/polkit-1/actions/")
+         ("usr/share/icons" "/share/icons/"))
        #:phases
        (modify-phases %standard-phases
-         (replace 'unpack
-           (lambda* (#:key inputs #:allow-other-keys)
-             (invoke "tar" "-xvzf" (assoc-ref inputs "source") "--strip-components" "1")))
+         (replace 'binary-unpack
+           (lambda* (#:key source #:allow-other-keys)
+             (let* ((files (filter (lambda (f)
+                          (not (string=? (basename f) "environment-variables")))
+                        (find-files (getcwd))))
+         (binary-file (car files)))
+    (when (= 1 (length files))
+      (mkdir "binary")
+      (chdir "binary")
+      (invoke "ar" "x" binary-file)
+      (invoke "tar" "xvf" "data.tar.gz")
+      (invoke "rm" "-rfv" "control.tar.gz"
+          "data.tar.gz"
+          binary-file
+          "debian-binary")))))
          (add-after 'wrap-program 'install-desktop-entry
            (lambda* (#:key outputs #:allow-other-keys)
-             (let* ((desktop-file "anydesk.desktop")
+             (let* ((desktop-file "usr/share/applications/anydesk.desktop")
                     (out (assoc-ref outputs "out"))
                     (applications (string-append out "/share/applications")))
                (substitute* desktop-file