From: Glenn Morris <rgm@gnu.org>
Date: Sat, 8 Apr 2017 20:45:55 +0000 (-0700)
Subject: * lisp/gnus/nnmail.el (nnmail-crosspost-link-function): Simplify.
X-Git-Tag: emacs-26.0.90~521^2~670
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f4bb93fabc64dedac157087836e3c9e4a6a98140;p=emacs.git

* lisp/gnus/nnmail.el (nnmail-crosspost-link-function): Simplify.
---

diff --git a/lisp/gnus/nnmail.el b/lisp/gnus/nnmail.el
index 3f2e08171e0..71d9631776d 100644
--- a/lisp/gnus/nnmail.el
+++ b/lisp/gnus/nnmail.el
@@ -263,7 +263,7 @@ It scans low-level sorted spools even when not required."
   :type 'function)
 
 (defcustom nnmail-crosspost-link-function
-  (if (string-match "windows-nt" (symbol-name system-type))
+  (if (eq 'windows-nt system-type)
       'copy-file
     'add-name-to-file)
   "Function called to create a copy of a file.