(use-package key-chord
  :chords (";;" . clmemo-with-myfile))

;; Set my-clmemo-file-name
(setq my-clmemo-file-name "~/Dropbox/howm/mylog.txt")
;; Function to open my-clmemo-file with clmemo
(defun clmemo-with-myfile (my-clmemo-file-name)
  (interactive (list (read-from-minibuffer "clmemo file: " my-clmemo-file-name)))
	(let ((clmemo-file-name my-clmemo-file-name))
	(call-interactively 'clmemo)))