From: Paul Eggert <eggert@cs.ucla.edu>
Date: Tue, 29 Aug 2017 04:47:16 +0000 (-0700)
Subject: Simplify remove_slash_colon
X-Git-Tag: emacs-26.0.90~322
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7b8699759f3332e8b5cfe6eed5a80090d9ef8948;p=emacs.git

Simplify remove_slash_colon

* src/process.c (remove_slash_colon): Simplify
and avoid a special case for "/:" by itself.
---

diff --git a/src/process.c b/src/process.c
index 730caea677f..c45a3f63ce5 100644
--- a/src/process.c
+++ b/src/process.c
@@ -7692,7 +7692,7 @@ Lisp_Object
 remove_slash_colon (Lisp_Object name)
 {
   return
-    ((SBYTES (name) > 2 && SREF (name, 0) == '/' && SREF (name, 1) == ':')
+    (SREF (name, 0) == '/' && SREF (name, 1) == ':'
      ? make_specified_string (SSDATA (name) + 2, SCHARS (name) - 2,
 			      SBYTES (name) - 2, STRING_MULTIBYTE (name))
      : name);