@@ -178,31 +178,15 @@ rescale01 <- function(x) {
178
178
179
179
# ' Give a deprecation error, warning, or message, depending on version number.
180
180
# '
181
- # ' Version numbers have the format <major>.<minor>.<subminor>, like 0.9.2.
182
- # ' This function compares the current version number of ggplot2 against the
183
- # ' specified `version`, which is the most recent version before the
184
- # ' function (or other object) was deprecated.
185
- # '
186
- # ' `gg_dep` will give an error, warning, or message, depending on the
187
- # ' difference between the current ggplot2 version and the specified
188
- # ' `version`.
189
- # '
190
- # ' If the current major number is greater than `version`'s major number,
191
- # ' or if the current minor number is more than 1 greater than `version`'s
192
- # ' minor number, give an error.
193
- # '
194
- # ' If the current minor number differs from `version`'s minor number by
195
- # ' one, give a warning.
196
- # '
197
- # ' If the current subminor number differs from `version`'s subminor
198
- # ' number, print a message.
181
+ # ' This function is deprecated.
199
182
# '
200
183
# ' @param version The last version of ggplot2 where this function was good
201
184
# ' (in other words, the last version where it was not deprecated).
202
185
# ' @param msg The message to print.
203
186
# ' @keywords internal
204
187
# ' @export
205
188
gg_dep <- function (version , msg ) {
189
+ .Deprecate()
206
190
v <- as.package_version(version )
207
191
cv <- utils :: packageVersion(" ggplot2" )
208
192
0 commit comments