Re: Patch for "CREATE TABLE ... (LIKE ... INCLUDING COMMENTS)"

...with thunderbird plain-text sorted...


$ diff -c parse_utilcmd_old.c parse_utilcmd.c
*** parse_utilcmd_old.c	2018-12-11 12:44:52.288309000 +0100
--- parse_utilcmd.c	2018-12-11 12:44:52.208308782 +0100
***************
*** 918,923 ****
--- 918,941 ----
  						   RelationGetRelationName(relation));
  	}

+ 	/*
+ 	 * Copy the comment on the object itself, if requested.
+ 	 */
+ 	if ((table_like_clause->options & CREATE_TABLE_LIKE_COMMENTS) &&
+ 		(comment = GetComment(relation->rd_id,
+ 							  RelationRelationId,
+ 							  0)) != NULL)
+ 	{
+ 		CommentStmt *stmt = makeNode(CommentStmt);
+
+ 		stmt->objtype = get_relkind_objtype(relation->rd_rel->relkind);
+ 		stmt->object = (Node *)
list_make2(makeString(cxt->relation->schemaname),
+ 										   makeString(cxt->relation->relname));
+ 		stmt->comment = comment;
+
+ 		cxt->alist = lappend(cxt->alist, stmt);
+ 	}
+
  	tupleDesc = RelationGetDescr(relation);
  	constr = tupleDesc->constr;