File: usr-dict.patch

package info (click to toggle)
libdata-password-perl 1.12-1
  • links: PTS, VCS
  • area: main
  • in suites: buster, stretch
  • size: 120 kB
  • ctags: 18
  • sloc: perl: 123; makefile: 2
file content (32 lines) | stat: -rw-r--r-- 886 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
Description: Use FHS compliant paths in Debian package
Author: Michael Shuler <michael@pbandjelly.org>
Forwarded: not-needed (debian-specific)
Last-Update: 2014-05-01

--- a/Password.pm
+++ b/Password.pm
@@ -29,7 +29,9 @@ $MAXLEN = 8;
 $SKIPCHAR = 0;
 $BADCHARS = '\0-\x1F\x7F';
 
-@DICTIONARIES = qw(/usr/dict/web2 /usr/dict/words /usr/share/dict/words /usr/share/dict/linux.words);
+# Modified for Debian FHS from /usr/dict/* to /usr/share/dict/*
+#@DICTIONARIES = qw(/usr/dict/web2 /usr/dict/words /usr/share/dict/words /usr/share/dict/linux.words);
+@DICTIONARIES = qw(/usr/share/dict/web2 /usr/share/dict/words /usr/share/dict/linux.words);
 
 sub OpenDictionary {
 	foreach my $sym (@DICTIONARIES) {
@@ -271,11 +273,11 @@ Force numbers and upper case only $BADCH
 
 =item *
 
-/usr/dict/web2
+/usr/share/dict/web2
 
 =item *
 
-/usr/dict/words
+/usr/share/dict/words
 
 =item *