diff --git a/historic/jam/src/modules/property-set.c b/historic/jam/src/modules/property-set.c
index 7aa7bc848..439cead53 100644
--- a/historic/jam/src/modules/property-set.c
+++ b/historic/jam/src/modules/property-set.c
@@ -26,7 +26,7 @@ rule create ( raw-properties * )
 LIST *property_set_create( PARSE *parse, FRAME *frame )
 {
     LIST* properties = lol_get( frame->args, 0 );    
-    LIST* sorted = list_short(properties);
+    LIST* sorted = list_sort(properties);
     LIST* unique = list_unique(sorted);
 
     LIST* val;
@@ -63,8 +63,10 @@ LIST *property_set_create( PARSE *parse, FRAME *frame )
     }
     
     string_free(var);
+    /* The 'unique' is freed in 'frame_free' class. */
     list_free(sorted);
-    list_free(unique);
+
+
 
     return val;
 
diff --git a/jam_src/modules/property-set.c b/jam_src/modules/property-set.c
index 7aa7bc848..439cead53 100644
--- a/jam_src/modules/property-set.c
+++ b/jam_src/modules/property-set.c
@@ -26,7 +26,7 @@ rule create ( raw-properties * )
 LIST *property_set_create( PARSE *parse, FRAME *frame )
 {
     LIST* properties = lol_get( frame->args, 0 );    
-    LIST* sorted = list_short(properties);
+    LIST* sorted = list_sort(properties);
     LIST* unique = list_unique(sorted);
 
     LIST* val;
@@ -63,8 +63,10 @@ LIST *property_set_create( PARSE *parse, FRAME *frame )
     }
     
     string_free(var);
+    /* The 'unique' is freed in 'frame_free' class. */
     list_free(sorted);
-    list_free(unique);
+
+
 
     return val;