From: Tim Vaughan <plugd@thelambdalab.xyz>
Date: Sun, 17 May 2020 10:36:06 +0000 (+0200)
Subject: Bugfix: file name suggestion for gemini downloads.
X-Git-Tag: v2.7.5~8
X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=elpher.git;a=commitdiff_plain;h=46dac5a84b17c972b4479ccb0b288ae531c247a0

Bugfix: file name suggestion for gemini downloads.
---

diff --git a/elpher.el b/elpher.el
index ab75730..8113c53 100644
--- a/elpher.el
+++ b/elpher.el
@@ -2,7 +2,7 @@
 
 ;; Copyright (C) 2019 Tim Vaughan
 
-;; Author: Tim Vaughan <timv@ughan.xyz>
+;; Author: Tim Vaughan <plugd@thelambdalab.xyz>
 ;; Created: 11 April 2019
 ;; Version: 2.7.4
 ;; Keywords: comm gopher
@@ -813,7 +813,9 @@ The response is rendered using the rendering function RENDERER."
   (if (not data)
       nil
     (let* ((address (elpher-page-address elpher-current-page))
-           (selector (elpher-gopher-address-selector address)))
+           (selector (if (elpher-address-gopher-p address)
+                         (elpher-gopher-address-selector address)
+                       (elpher-address-filename address))))
       (elpher-visit-previous-page) ; Do first in case of non-local exits.
       (let* ((filename-proposal (file-name-nondirectory selector))
              (filename (read-file-name "Download complete. Save file as: "