diff --git a/swad_HTML.c b/swad_HTML.c
index cded6a4d..ee2946e7 100644
--- a/swad_HTML.c
+++ b/swad_HTML.c
@@ -921,6 +921,14 @@ void HTM_INPUT_BUTTON (const char *Name,const char *Value,const char *Attr)
 	    Name,Value,Attr);
   }
 
+void HTM_INPUT_IMAGE (const char *ImgFile,const char *Title,const char *Class)
+  {
+   fprintf (Gbl.F.Out,"<input type=\"image\" src=\"%s/%s\""
+		      " alt=\"%s\" title=\"%s\" class=\"%s\" />",
+	    Cfg_URL_ICON_PUBLIC,ImgFile,
+	    Title,Title,Class);
+  }
+
 /*****************************************************************************/
 /********************************* Text areas ********************************/
 /*****************************************************************************/
diff --git a/swad_HTML.h b/swad_HTML.h
index 5829f4c9..3d9b6b54 100644
--- a/swad_HTML.h
+++ b/swad_HTML.h
@@ -97,6 +97,7 @@ void HTM_INPUT_URL (const char *Name,const char *Value,bool SubmitOnChange,
 	            const char *fmt,...);
 void HTM_INPUT_FILE (const char *Accept,bool SubmitOnChange);
 void HTM_INPUT_BUTTON (const char *Name,const char *Value,const char *Attr);
+void HTM_INPUT_IMAGE (const char *ImgFile,const char *Title,const char *Class);
 
 void HTM_TEXTAREA_Begin (const char *fmt,...);
 void HTM_TEXTAREA_End (void);
diff --git a/swad_changelog.h b/swad_changelog.h
index d4bdabae..30fa3cd5 100644
--- a/swad_changelog.h
+++ b/swad_changelog.h
@@ -487,7 +487,7 @@ enscript -2 --landscape --color --file-align=2 --highlight --line-numbers -o - *
 En OpenSWAD:
 ps2pdf source.ps destination.pdf
 */
-#define Log_PLATFORM_VERSION	"SWAD 19.51.12 (2019-11-04)"
+#define Log_PLATFORM_VERSION	"SWAD 19.51.13 (2019-11-04)"
 #define CSS_FILE		"swad19.47.css"
 #define JS_FILE			"swad19.39.js"
 /*
@@ -495,6 +495,7 @@ ps2pdf source.ps destination.pdf
 // TODO: Impedir la creación y edición de proyectos si no son editables.
 // TODO: Importante: filtrar proyectos por usuarios (igual que en trabajos o en asistencia)
 
+	Version 19.51.13: Nov 04, 2019	Code refactoring in HTML inputs. (245874 lines)
 	Version 19.51.12: Nov 04, 2019	Code refactoring in HTML inputs. (245873 lines)
 	Version 19.51.11: Nov 04, 2019	Code refactoring in HTML inputs. (245868 lines)
 	Version 19.51.10: Nov 04, 2019	Code refactoring in HTML inputs. (245971 lines)
diff --git a/swad_icon.c b/swad_icon.c
index a0d2a6b7..13a5eb95 100644
--- a/swad_icon.c
+++ b/swad_icon.c
@@ -363,11 +363,7 @@ void Ico_PutDivIconLink (const char *DivClass,const char *Icon,const char *Title
 
 void Ico_PutIconLink (const char *Icon,const char *Title)
   {
-   fprintf (Gbl.F.Out,"<input type=\"image\" src=\"%s/%s\""
-		      " alt=\"%s\" title=\"%s\""
-		      " class=\"CONTEXT_OPT ICO_HIGHLIGHT CONTEXT_ICO_16x16\" />",
-	    Cfg_URL_ICON_PUBLIC,Icon,
-	    Title,Title);
+   HTM_INPUT_IMAGE (Icon,Title,"CONTEXT_OPT ICO_HIGHLIGHT CONTEXT_ICO_16x16");
   }
 
 /*****************************************************************************/
@@ -389,11 +385,7 @@ void Ico_PutIconTextLink (const char *Icon,const char *Text)
 
 void Ico_PutSettingIconLink (const char *Icon,const char *Title)
   {
-   fprintf (Gbl.F.Out,"<input type=\"image\" src=\"%s/%s\""
-		      " alt=\"%s\" title=\"%s\""
-		      " class=\"ICO_HIGHLIGHT ICOx20\" />",
-	    Cfg_URL_ICON_PUBLIC,Icon,
-	    Title,Title);
+   HTM_INPUT_IMAGE (Icon,Title,"ICO_HIGHLIGHT ICOx20");
   }
 
 /*****************************************************************************/