[Bug 1329059] Don't produce terminal control sequences in perldoc
https://bugzilla.redhat.com/show_bug.cgi?id=1329059
Petr Pisar <ppisar(a)redhat.com> changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|NEW |CLOSED
Resolution|--- |WORKSFORME
Last Closed| |2016-04-21 02:28:49
--- Comment #1 from Petr Pisar <ppisar(a)redhat.com> ---
I cannot reproduce it on Fedora 23:
TERM=xterm
LESSOPEN=|/usr/bin/lesspipe.sh %s
ncurses-5.9-21.20150214.fc23.x86_64
ncurses-libs-5.9-21.20150214.fc23.x86_64
xterm-318-2.fc23.x86_64
less-481-1.fc23.x86_64
perl-Pod-Perldoc-3.25-347.fc23.noarch
Though I admit some people sometimes complained about the same issue. I would
welcome reliable reproducer.
To the question: Yes, perldoc has "-t" argument that disables ANSI sequences on
the output. I think "perldoc --help" is not so hard way to discover it.
I can fairly reproduce it with "perldoc -T perlreref | less". The capital -T
prints the output to stdout instead of sending it to a pager. But the perldoc
(that I have, the behavior changes with various perldoc versions) feeds the
pager from a temporary file. strace shows:
[pid 3367] execve("/usr/bin/less", ["less"],
["XDG_VTNR=1",
"XDG_SESSION_ID=1", "SSH_AGENT_PID=2103",
"HOSTNAME=dhcp-0-146.brq.redhat.c"..., "SHELL=/bin/bash",
"TERM=xterm",
"HISTSIZE=1000", "TERMPATH=/home/petr/.termcap:/et"...,
"WINDOWID=65011747",
"QTDIR=/usr/lib64/qt-3.3", "QTINC=/usr/lib64/qt-3.3/include",
"XORG_RUN_AS_USER_OK=1", "USER=petr",
"XTERM_SHELL=/bin/bash",
"LS_COLORS=rs=0:di=01;34:ln=01;36"...,
"SSH_AUTH_SOCK=/tmp/ssh-QUjk3MkTh"...,
"PAGER=less", "PATH=/home/petr/bin:/usr/lib64/q"...,
"MAIL=/var/spool/mail/petr", "_=/usr/bin/less",
"QT_IM_MODULE=xim",
"PWD=/home/petr", "XMODIFIERS=@im=SCIM",
"EDITOR=/usr/bin/vim",
"LANG=cs_CZ.UTF-8", "MODULEPATH=/etc/scl/modulefiles:"...,
"LOADEDMODULES=",
"HISTCONTROL=ignoredups", "XTERM_VERSION=XTerm(318)",
"XTERM_LOCALE=cs_CZ.UTF-8", "HOME=/home/petr",
"XDG_SEAT=seat0", "SHLVL=5",
"LESS=-R", "LOGNAME=petr", "CVS_RSH=ssh",
"QTLIB=/usr/lib64/qt-3.3/lib",
"MODULESHOME=/usr/share/Modules", "LESSOPEN=|/usr/bin/lesspipe.sh
%"...,
"WINDOWPATH=1", "XDG_RUNTIME_DIR=/run/user/500",
"DISPLAY=:0.0",
"GTK_IM_MODULE=scim", "XAUTHORITY=/home/petr/.Xauthorit"...,
"CCACHE_HASHDIR=",
"BASH_FUNC_module()=() { eval `/"..., "BASH_FUNC_scl()=() { local
CMD="...])
= 0
I suspect perldoc sets LESS=-R. I dont' have the variable in my environment:
$ set |grep LESS
LESSOPEN='|/usr/bin/lesspipe.sh %s'
"perldoc -T perlreref | LESS=-R less" works for me.
From my point of view, perldoc is fine in Fedora. This is issue in RHEL-7's
perldoc.
--
You are receiving this mail because:
You are on the CC list for the bug.