Source

egg-its / dumped-lisp.el

Diff from to

File dumped-lisp.el

 (setq package-lisp
-      (assemble-list
-       (when-feature (and mule wnn) "egg-leim")
-       (when-feature (and mule wnn) "egg-kwnn-leim")
-       (when-feature (and mule wnn) "egg-cwnn-leim")
-       (when-feature mule "egg-sj3-leim")
+      (list
+       (when (featurep '(and mule wnn)) "egg-leim")
+       (when (featurep '(and mule wnn)) "egg-kwnn-leim")
+       (when (featurep '(and mule wnn)) "egg-cwnn-leim")
+       (when (featurep 'mule) "egg-sj3-leim")
 ))
+
+(setq package-lisp
+      (apply #'nconc
+	     (mapcar #'(lambda (x)
+			 (if (listp x) x (list x)))
+		     package-lisp)))