set subdirectories as emacs-version

init.el

@@ -111,9 +111,22 @@
         package-archives user/package-mirror
         )
 
-  (if (< emacs-major-version 27.0)
-      (package-initialize)
-    )
+  ;; Evaluate the correct package subdirectory of packages.
+  (setq package-user-dir
+	(file-name-as-directory
+	 (if (not elpa-subdirectory)
+	     elpa-pack-dir
+	   (let ((subdir (format "%d%s%d"
+				 emacs-major-version
+				 version-separator
+				 emacs-minor-version)))
+	     (expand-file-name subdir elpa-pack-dir))
+	     )
+	 ))
+
+  ;; Load Emacs packages and initialize them.
+  (package-initialize)
+
   (or (package-installed-p 'use-package)
       (progn
         (package-refresh-contents)

lisp/configs.el

@@ -48,6 +48,9 @@
   (expand-file-name "elpa" user-emacs-directory )
   "Packages install by package-initilize.")
 
+(defvar elpa-subdirectory 'emacs-version
+  )
+
 (defvar default-package-mirror '(("melpa" . "https://melpa.org/packages/")
                                  ("org" . "https://orgmode.org/elpa/")
                                  ("gnu" . "https://elpa.gnu.org/packages/"))