From c27a9eabae474f9eeb7470f2a3e23bc5351e0600 Mon Sep 17 00:00:00 2001
From: Riyyi <riyyi3@gmail.com>
Date: Sun, 26 Jul 2020 05:13:40 +0200
Subject: [PATCH] Add custom frame title

---
 .emacs.d/config.org | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

diff --git a/.emacs.d/config.org b/.emacs.d/config.org
index 0e55a8e..001269e 100644
--- a/.emacs.d/config.org
+++ b/.emacs.d/config.org
@@ -556,6 +556,22 @@ https://github.com/laishulu/hl-fill-column
 
   ;; When in the GUI version of Emacs, enable pretty symbols
   (when window-system (global-prettify-symbols-mode t))
+
+  ;; Set the frame title
+  (setq frame-title-format
+		`("%b"
+		  (:eval
+		   (if (buffer-file-name)
+			   (concat
+				(if (buffer-modified-p) " *" nil)
+				" ("
+				(abbreviate-file-name
+				 (directory-file-name
+				  (file-name-directory (buffer-file-name))))
+				")")
+			 nil))
+		  ,(format " - GNU Emacs %s" emacs-version)
+		  ))
 #+END_SRC
 
 ** Buffers