diff options
Diffstat (limited to 'lisp/obsolete/pgg.el')
| -rw-r--r-- | lisp/obsolete/pgg.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/obsolete/pgg.el b/lisp/obsolete/pgg.el index fd35f7d333e..18b63fc3ee6 100644 --- a/lisp/obsolete/pgg.el +++ b/lisp/obsolete/pgg.el @@ -1,6 +1,6 @@ ;;; pgg.el --- glue for the various PGP implementations. -;; Copyright (C) 1999-2000, 2002-2018 Free Software Foundation, Inc. +;; Copyright (C) 1999-2000, 2002-2019 Free Software Foundation, Inc. ;; Author: Daiki Ueno <ueno@unixuser.org> ;; Symmetric encryption added by: Sascha Wilde <wilde@sha-bang.de> @@ -572,7 +572,7 @@ within the region." (with-current-buffer (get-buffer-create pgg-output-buffer) (buffer-disable-undo) (erase-buffer) - (let ((proto (if (string-match "^[a-zA-Z\\+\\.\\\\-]+:" keyserver) + (let ((proto (if (string-match "^[a-zA-Z\\+.-]+:" keyserver) (substring keyserver 0 (1- (match-end 0)))))) (save-excursion (funcall pgg-insert-url-function |