yogsototh/her.esy.fun
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Fixes

Browse source
This commit is contained in:
Yann Esposito (Yogsototh) 2019-07-29 00:15:25 +02:00
parent 5a96e41469
commit 1bf7a20242
Signed by untrusted user who does not match committer: yogsototh
GPG key ID: 7B19A4C650D59646
3 changed files with 7 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

BIN
.project.el.gpg
View file

Binary file not shown.

7
src/archive.org
View file

@ -2,12 +2,7 @@
#+AUTHOR: Yann Esposito
#+EMAIL: yann.esposito@gmail.com
* Articles
:PROPERTIES:
:ID: A238A3BD-18B5-42D8-8FB3-E522DB3795CC
:PUBDATE: <2019-07-28 Sun 15:11>
:END:
#+begin_archive
@@html:<li>@@ @@html:<span class="archive-item"><span class="archive-date">@@ 2019-07-28: @@html:</span>@@ [[file:posts/autoload-emacs-script-by-project.org][Autoload Script by project]] @@html:</span>@@ @@html:</li>@@
@@html:<li>@@ @@html:<span class="archive-item"><span class="archive-date">@@ 2019-07-28: @@html:</span>@@ [[file:posts/project-el/index.org][Autoload Script by project]] @@html:</span>@@ @@html:</li>@@
@@html:<li>@@ @@html:<span class="archive-item"><span class="archive-date">@@ 2019-07-07: @@html:</span>@@ [[file:posts/2019-07-04-static-org-publish.org][Static blog with org-mode]] @@html:</span>@@ @@html:</li>@@
#+end_archive

13
src/posts/project-el/auto-load-project.el
View file

@ -14,13 +14,12 @@
(defvar y/trusted-gpg-key-fingerprints
'("448E9FEF4F5B86DE79C1669B0000000000000000")
"The list of GPG fingerprint you trust when decrypting a gpg file.
You can retrieve the fingerprints of your own private keys
with: `gpg --list-secret-keys' (take care of removing the
spaces when copy/pasting here)")
You can retrieve the fingerprints of your own private keys
with: `gpg --list-secret-keys' (take care of removing the
spaces when copy/pasting here)")
(defun y/get-encryption-key (file)
"given a gpg encrypted file, returns the fingerprint of
they key that encrypted it"
"Return the fingerprint of they key that encrypted FILE."
(string-trim-right
(shell-command-to-string
(concat
@ -29,7 +28,7 @@
"|awk '{print $4}'"))))
(defun y/trusted-gpg-origin-p (file)
"Returns true if the file is encrypted with a trusted key"
"Return non-nil if the FILE is encrypted with a trusted key."
(member (y/get-encryption-key file) y/trusted-gpg-key-fingerprints))
@ -46,7 +45,7 @@
(defun y/load-project-file ()
"Loads the `y/project-file' for a project. This is run once
after the project is loaded signifying project setup."
after the project is loaded signifying project setup."
(interactive)
(when (projectile-project-p)
(lexical-let* ((current-project-root (projectile-project-root))