[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [STUMP] [PATCH] Add ~/.stumpwm.d/config as an init-file option
From: |
Edward Trumbo |
Subject: |
Re: [STUMP] [PATCH] Add ~/.stumpwm.d/config as an init-file option |
Date: |
Wed, 04 Feb 2015 09:39:05 -0500 |
Thank you. I've created a fork and pull request and I look forward to
any discussion or its acceptance.
Please be patient with me. Until yesterday my Git experience was limited
to clones and pulls, and today I'm hip-deep in checkouts, forks,
commits, and several other things I've already forgotten in the past
hour. After confronting Git, I don't know whether to give up beer or
drink more of it. ;-)
--
Edward Trumbo
"In Emacs Veritas."
David Bjergaard <address@hidden> writes:
> Pull requests welcome! I'll merge this patch when I get a chance.
>
> Dave
>
> Edward Trumbo <address@hidden> writes:
>
>> This is a revised version of my patch, incorporating J David Smith's
>> suggestion to use the more Lispy/Emacsey "~/.stumpwm.d/init.lisp" as the
>> option for an init file.
>>
>> On a related note, I'd like to see the options for init-file placement
>> get more "press". Our documentation (Info/Wiki/etc.) doesn't mention
>> this anywhere, to my knowledge. I'd like to amend the relevant section
>> of the wiki with some references to it, and possibly even add a page in
>> the manual. First, I think we should see whether this patch merits
>> inclusion in the code base.
>>
>> ---
>> stumpwm.lisp | 4 +++-
>> 1 file changed, 3 insertions(+), 1 deletion(-)
>>
>> diff --git a/stumpwm.lisp b/stumpwm.lisp
>> index 0a38fef..dd13023 100644
>> --- a/stumpwm.lisp
>> +++ b/stumpwm.lisp
>> @@ -43,10 +43,12 @@ further up. "
>> dir)))
>> (user-rc
>> (probe-file (merge-pathnames #p".stumpwmrc"
>> (user-homedir-pathname))))
>> + (dir-rc
>> + (probe-file (merge-pathnames #p".stumpwm.d/init.lisp"
>> (user-homedir-pathname))))
>> (conf-rc
>> (probe-file (merge-pathnames #p"stumpwm/config" xdg-config-dir)))
>> (etc-rc (probe-file #p"/etc/stumpwmrc"))
>> - (rc (or user-rc conf-rc etc-rc)))
>> + (rc (or user-rc dir-rc conf-rc etc-rc)))
>> (if rc
>> (if catch-errors
>> (handler-case (load rc)
>> --
>> 1.8.4