From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Sat, 16 Dec 2017 22:43:38 +0000 (-0500)
Subject: * lisp/textmodes/css-mode.el (css--hex-color): Trivial simplification
X-Git-Tag: emacs-27.0.90~6017
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ac0d6c06b805b8f05a854a69639531bf737fea3f;p=emacs.git

* lisp/textmodes/css-mode.el (css--hex-color): Trivial simplification
---

diff --git a/lisp/textmodes/css-mode.el b/lisp/textmodes/css-mode.el
index 96c3f6b9395..b0e66d397f0 100644
--- a/lisp/textmodes/css-mode.el
+++ b/lisp/textmodes/css-mode.el
@@ -1037,9 +1037,7 @@ This recognizes CSS-color-4 extensions."
 STR is the incoming CSS hex color.
 This function simply drops any transparency."
   ;; Either #RGB or #RRGGBB, drop the "A" or "AA".
-  (if (> (length str) 5)
-      (substring str 0 7)
-    (substring str 0 4)))
+  (substring str 0 (if (> (length str) 5) 7 4)))
 
 (defun css--named-color (start-point str)
   "Check whether STR, seen at point, is CSS named color.