wgester/dotfiles
1
0
Fork 0
forked from colonelpanic/dotfiles
Code Pull Requests Activity

Tweak gitolite.el

Browse Source
This commit is contained in:
Ivan Malison 2015-08-13 03:23:11 -07:00
parent dee7249122
commit 020e3754c1
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
dotfiles/emacs.d/load.d/gitolite.el
View File

@ -4,11 +4,12 @@
(defvar gitolite:username "gitolite") (defvar gitolite:username "gitolite")
(defvar gitolite:host) (defvar gitolite:host)
(defvar gitolite:ttl (* 60 60 24 3)) ;; 3 day ttl by default (defvar gitolite:ttl (* 60 60 24 3)) ;; 3 day ttl by default
(defvar gitolite:base-path "~")
(defvar gitolite:determine-target 'gitolite:default-determine-target) (defvar gitolite:determine-target 'gitolite:default-determine-target)
(defvar gitolite:action 'gitolite:default-action) (defvar gitolite:action 'gitolite:default-action)
(defun gitolite:default-determine-target (username host repo-name) (defun gitolite:default-determine-target (username host repo-name)
(format "~/%s" (-last-item (s-split "/" repo-name)))) (format "%s/%s" gitolite:base-path (-last-item (s-split "/" repo-name))))
(defun gitolite:default-action (username host repo-name target) (defun gitolite:default-action (username host repo-name target)
(dired target)) (dired target))