Function: jka-compr-set

Internal Custom :set function.