Fix tidyverse#2429. Minor changes to NEWS update and formatting

Author: Anthony Chiu

NEWS.md

@@ -84,11 +84,11 @@
 
 * Increase the default `nbin` of `guide_colourbar()` to place the ticks more precisely (#3508, @yutannihilation).
 
-* Modified `manual_scale` to match `values` with the order of `breaks` whenever
-  `values` is an unnamed vector. Previously, unnamed `values` would be matched
-  to the limits of the scale and ignore the order of any `breaks` provided. Note
-  that this may change the appearance of plots that previously relied on the
-  unordered behaviour. (#2429, @idno0001)
+* Modified `manual_scale()` to match `values` with the order of `breaks`
+  whenever `values` is an unnamed vector. Previously, unnamed `values` would
+  match with the limits of the scale and ignore the order of any `breaks`
+  provided. Note that this may change the appearance of plots that previously
+  relied on the unordered behaviour (#2429, @idno0001).
 
 # ggplot2 3.2.1
 

tests/testthat/test-scale-manual.r

@@ -69,15 +69,19 @@ test_that("generic scale can be used in place of aesthetic-specific scales", {
 })
 
 test_that("named values do not match with breaks in manual scales", {
-   s <- scale_fill_manual(values = c("data_red" = "red", "data_black" = "black"),
-                          breaks = c("data_black", "data_red"))
-   s$train(c("data_black", "data_red"))
-   expect_equal(s$map(c("data_red", "data_black")), c("red", "black"))
+  s <- scale_fill_manual(
+    values = c("data_red" = "red", "data_black" = "black"),
+    breaks = c("data_black", "data_red")
+  )
+  s$train(c("data_black", "data_red"))
+  expect_equal(s$map(c("data_red", "data_black")), c("red", "black"))
 })
 
 test_that("unnamed values match breaks in manual scales", {
-   s <- scale_fill_manual(values = c("red", "black"),
-                          breaks = c("data_red", "data_black"))
-   s$train(c("data_red", "data_black"))
-   expect_equal(s$map(c("data_red", "data_black")), c("red", "black"))
+  s <- scale_fill_manual(
+    values = c("red", "black"),
+    breaks = c("data_red", "data_black")
+  )
+  s$train(c("data_red", "data_black"))
+  expect_equal(s$map(c("data_red", "data_black")), c("red", "black"))
 })