diff --git a/ChangeLog b/ChangeLog
index f7127359..2a2bc866 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2008-02-19  Nicolas François  <nicolas.francois@centraliens.net>
+
+	* src/groupadd.c: Add missing 'p' to the getopt_long's optstring.
+
 2008-02-19  Nicolas François  <nicolas.francois@centraliens.net>
 
 	* NEWS, etc/login.defs: Set GID_MIN to the same value as UID_MIN
diff --git a/src/groupadd.c b/src/groupadd.c
index 8a2b4294..7e6ab8e6 100644
--- a/src/groupadd.c
+++ b/src/groupadd.c
@@ -364,7 +364,7 @@ static void process_flags (int argc, char **argv)
 	};
 
 	while ((c =
-		getopt_long (argc, argv, "fg:hK:or", long_options,
+		getopt_long (argc, argv, "fg:hK:op:r", long_options,
 		             &option_index)) != -1) {
 		switch (c) {
 		case 'f':