From mboxrd@z Thu Jan 1 00:00:00 1970 From: Alex Kost Subject: [PATCH 2/6] emacs: profiles: Add 'guix-system-profile'. Date: Sun, 10 Jan 2016 12:53:46 +0300 Message-ID: <1452419630-4399-3-git-send-email-alezost@gmail.com> References: <1452419630-4399-1-git-send-email-alezost@gmail.com> Mime-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:34506) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1aIChX-0002Ob-UV for guix-devel@gnu.org; Sun, 10 Jan 2016 04:54:20 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1aIChW-00027s-4k for guix-devel@gnu.org; Sun, 10 Jan 2016 04:54:19 -0500 Received: from mail-lf0-x243.google.com ([2a00:1450:4010:c07::243]:35879) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1aIChV-00027e-Tl for guix-devel@gnu.org; Sun, 10 Jan 2016 04:54:18 -0500 Received: by mail-lf0-x243.google.com with SMTP id t141so3941464lfd.3 for ; Sun, 10 Jan 2016 01:54:17 -0800 (PST) Received: from localhost.localdomain ([217.107.192.146]) by smtp.gmail.com with ESMTPSA id h9sm19893746lbj.42.2016.01.10.01.54.16 for (version=TLS1_2 cipher=ECDHE-RSA-AES128-SHA bits=128/128); Sun, 10 Jan 2016 01:54:16 -0800 (PST) In-Reply-To: <1452419630-4399-1-git-send-email-alezost@gmail.com> List-Id: "Development of GNU Guix and the GNU System distribution." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org Sender: guix-devel-bounces+gcggd-guix-devel=m.gmane.org@gnu.org To: guix-devel@gnu.org * emacs/guix-profiles.el (guix-system-profile): New variable. --- emacs/guix-profiles.el | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/emacs/guix-profiles.el b/emacs/guix-profiles.el index 2c19368..43ad1d4 100644 --- a/emacs/guix-profiles.el +++ b/emacs/guix-profiles.el @@ -1,6 +1,7 @@ ;;; guix-profiles.el --- Guix profiles -;; Copyright © 2014 Alex Kost +;; Copyright © 2014, 2015, 2016 Alex Kost +;; Copyright © 2015 Mathieu Lirzin ;; This file is part of GNU Guix. @@ -25,6 +26,10 @@ (expand-file-name "~/.guix-profile") "User profile.") +(defvar guix-system-profile + (concat guix-config-state-directory "/profiles/system") + "System profile.") + (defvar guix-default-profile (concat guix-config-state-directory "/profiles/per-user/" -- 2.6.3