This patch originates from the Debian project, see https://www.debian.org/

03db4.dpatch  by  <hesso@pool.math.tu-berlin.de>


libdb4 compatibility adjustments.

In particular, this patch adds extra file permission checking and passes the
DB_CREATE flag to the first invocation of db_open on the file's database
structure, which rids us of the following message:

  BDB0635 DB_CREATE must be specified to create databases.

--- nvi-1.81.6.orig/common/msg.c	2009-02-26 14:26:58.350336128 +0100
+++ nvi-1.81.6/common/msg.c	2009-02-26 14:29:05.235335829 +0100
@@ -724,9 +724,18 @@
 		p = buf;
 	} else
 		p = file;
+	if (access(p, F_OK) != 0) {
+		if (first) {
+			first = 0;
+			return (1);
+		}
+		sp->db_error = ENOENT;
+		msgq_str(sp, M_DBERR, p, "%s");
+		return (1);
+	}
 	if ((sp->db_error = db_create(&db, 0, 0)) != 0 ||
 	    (sp->db_error = db->set_re_source(db, p)) != 0 ||
-	    (sp->db_error = db_open(db, NULL, DB_RECNO, 0, 0)) != 0) {
+	    (sp->db_error = db_open(db, NULL, DB_RECNO, DB_CREATE, 0)) != 0) {
 		if (first) {
 			first = 0;
 			return (1);
ix/about/'>about</a><a href='/guix/'>summary</a><a href='/guix/refs/?id=753baf775f728da1ad06207fdb033b49fbd1dbc0'>refs</a><a class='active' href='/guix/log/emacs/guix-profiles.el'>log</a><a href='/guix/tree/emacs/guix-profiles.el?id=753baf775f728da1ad06207fdb033b49fbd1dbc0'>tree</a><a href='/guix/commit/emacs/guix-profiles.el?id=753baf775f728da1ad06207fdb033b49fbd1dbc0'>commit</a><a href='/guix/diff/emacs/guix-profiles.el?id=753baf775f728da1ad06207fdb033b49fbd1dbc0'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/emacs/guix-profiles.el'>
<input type='hidden' name='id' value='753baf775f728da1ad06207fdb033b49fbd1dbc0'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=753baf775f728da1ad06207fdb033b49fbd1dbc0'>root</a>/<a href='/guix/log/emacs?id=753baf775f728da1ad06207fdb033b49fbd1dbc0'>emacs</a>/<a href='/guix/log/emacs/guix-profiles.el?id=753baf775f728da1ad06207fdb033b49fbd1dbc0'>guix-profiles.el</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/emacs/guix-profiles.el?id=753baf775f728da1ad06207fdb033b49fbd1dbc0&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2016-02-22 22:36:35 +0300'>2016-02-22</span></td><td><a href='/guix/commit/emacs/guix-profiles.el?id=260795b7369c51d99c7ab4f3ef24f195938beabf'>emacs: Do not allow a user to modify system profiles.</a><span class='msg-avail'>...<span class='msg-tooltip'>Fixes &lt;http://bugs.gnu.org/22607&gt;.
Reported by myglc2 &lt;myglc2@gmail.com&gt;.

Remove possibilities to install/delete packages to/from a system profile
both for "Package List" and "Package Info" buffers.

* emacs/guix-profiles.el (guix-system-profile-regexp): New variable.
(guix-system-profile?): New procedure.
* emacs/guix-ui-package.el (guix-package-info-insert-output): Do not
display "Install"/"Delete" button for a system profile.
(guix-package-assert-non-system-profile): New procedure.
(guix-package-execute-actions): Use it.
</span></span></td><td>Alex Kost</td></tr>
<tr><td><span title='2016-01-16 13:02:21 +0300'>2016-01-16</span></td><td><a href='/guix/commit/emacs/guix-profiles.el?id=a0ad8ab01e839f3d3dbea0da84efbe51e8b67589'>emacs: profiles: Add 'guix-system-profile'.</a><span class='msg-avail'>...<span class='msg-tooltip'>* emacs/guix-profiles.el (guix-system-profile): New variable.
</span></span></td><td>Alex Kost</td></tr>
<tr><td><span title='2015-10-20 16:47:05 +0300'>2015-10-20</span></td><td><a href='/guix/commit/emacs/guix-profiles.el?id=380566157de6b0f3ec952c768fac5baafac602f0'>emacs: config: Use "emacs-config-" prefix for constants.</a><span class='msg-avail'>...<span class='msg-tooltip'>* emacs/guix-config.el.in (guix-emacs-interface-directory,
  guix-state-directory): Rename to ...
  (guix-config-emacs-interface-directory, guix-config-state-directory):
  ...this.
  (guix-config-guile-program): New constant.
  (guix-guile-program): Move to ...
* emacs/guix-external.el (guix-guile-program): ...here.  Make it a
  'defcustom'.
* emacs/guix-profiles.el (guix-default-profile): Use
  'guix-config-state-directory'.
* emacs/guix-backend.el (guix-load-path): Use
  'guix-config-emacs-interface-directory'.
</span></span></td><td>Alex Kost</td></tr>
<tr><td><span title='2015-08-30 19:20:12 +0200'>2015-08-30</span></td><td><a href='/guix/commit/emacs/guix-profiles.el?id=bd6163d13f6445b9a1ec0f85e4a19b9f73ab74ea'>build: Produce 'guix-config' instead of using compile-time tricks.</a><span class='msg-avail'>...<span class='msg-tooltip'>* emacs/guix-{init,profiles}.el.in: Rename to ...
* emacs/guix-{init,profiles}.el: ... these.  New files.
  Use 'guix-config'.
* emacs/guix-config.el.in: New file.
* emacs.am (nodist_lisp_DATA): Add it.  Move them to ...
  (ELFILES): ... here.
* .gitignore, configure.ac: Adjust accordingly.
</span></span></td><td>Mathieu Lirzin</td></tr>