diff --git a/g10/ChangeLog b/g10/ChangeLog
index 9c5deb307..c33f3b16e 100644
--- a/g10/ChangeLog
+++ b/g10/ChangeLog
@@ -6,6 +6,7 @@
 	bit time_t.
 	(save_unprotected_key_to_card): Made RSA_N_LEN et al a size_t.
 	Cast printf args.
+	(get_parameter_algo): Allow "ELG" as alias for "ELG-E".
 
 	* seckey-cert.c (do_check): Made NBYTES a size_t.
 	(do_check): Made NDATA a size_t.
diff --git a/g10/keygen.c b/g10/keygen.c
index 4602eabbf..259413754 100644
--- a/g10/keygen.c
+++ b/g10/keygen.c
@@ -2176,7 +2176,8 @@ get_parameter_algo( struct para_data_s *para, enum para_name key )
 	return -1;
     if( digitp( r->u.value ) )
 	i = atoi( r->u.value );
-    else if ( !strcmp ( r->u.value, "ELG-E") )
+    else if ( !strcmp ( r->u.value, "ELG-E")
+              || !strcmp ( r->u.value, "ELG") )
         i = GCRY_PK_ELG_E;
     else
         i = gcry_pk_map_name (r->u.value);