fix CRUCIAL bug on frame buffer

.emacs.el

@@ -778,7 +778,7 @@ return nil if LIB unfound and downloading failed, otherwise the path of LIB."
 (defun my-frame-buffer-add ()
   ""
   (setq my-frame-buffer-plist
-        (plist-put 'my-frame-buffer-plist
+        (plist-put my-frame-buffer-plist
                    (selected-frame)
                    (let ((lst (my-frame-buffer-get)))
                      (if lst
@@ -789,14 +789,14 @@ return nil if LIB unfound and downloading failed, otherwise the path of LIB."
 (defun my-frame-buffer-remove ()
   ""
   (setq my-frame-buffer-plist
-        (plist-put 'my-frame-buffer-plist
+        (plist-put my-frame-buffer-plist
                    (selected-frame)
                    (delq (current-buffer)
                          (my-frame-buffer-get)))))
 
 (defun my-frame-buffer-get (&optional frame)
   ""
-  (plist-get 'my-frame-buffer-plist
+  (plist-get my-frame-buffer-plist
              (or frame
                  (selected-frame))))
 
@@ -1730,12 +1730,12 @@ when SEC is nil, stop auto save if enabled."
 (defun my-execute-or-find-term ()
   ""
   (interactive)
-  (let* ((buf (plist-get 'my-frame-term-plist (selected-frame))))
+  (let* ((buf (plist-get my-frame-term-plist (selected-frame))))
     (if (and buf
              (buffer-name buf))
         (switch-to-buffer buf)
-      (setq my-frame-ter-plist
-            (plist-put 'my-frame-term-plist
+      (setq my-frame-term-plist
+            (plist-put my-frame-term-plist
                        (selected-frame)
                        (my-term))))))