                                             buffer-name
                                             ))
                 (shell-command compile-cmd "*Messages")
-                ;;(message compile-cmd)
+                (message compile-cmd  "*Messages")
+                (message (concat full-path match-directory "/ebin/"
+                                 (replace-regexp-in-string ".erl" ".beam" (buffer-name))
+                                 )  "*Messages")
+                (beam_hash_cp_key (concat full-path match-directory "/ebin/"
+                                          (replace-regexp-in-string ".erl" ".beam" (buffer-name))
+                                          ))
                 )
             )
           )

    )
  )


(add-hook 'after-save-hook 'rebar-compile-source)




;; rust
;;----------------------------------------------------------------------------

(require-package 'ess)
(require-package 'graphviz-dot-mode)
(require-package 'rust-mode)
(require-package 'toml-mode)
