File: Fv-Use-require-for-shared-libraries.patch

package info (click to toggle)
ftools-fv 5.5.2%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 7,072 kB
  • sloc: tcl: 50,774; ansic: 17,858; exp: 2,004; makefile: 172; cpp: 169; sh: 109; csh: 10
file content (25 lines) | stat: -rw-r--r-- 956 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
From: Ole Streicher <olebole@debian.org>
Date: Mon, 26 Mar 2018 17:13:33 +0200
Subject: [Fv] Use 'require' for shared libraries

---
 ftools/guis/fv/class/fvApp.tcl | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/ftools/guis/fv/class/fvApp.tcl b/ftools/guis/fv/class/fvApp.tcl
index 35acb12..555883d 100644
--- a/ftools/guis/fv/class/fvApp.tcl
+++ b/ftools/guis/fv/class/fvApp.tcl
@@ -199,10 +199,8 @@ itcl::body fvApp::_loadLibs { } {
       }
    } else {
       if ![ info exist env(FV_ISEXEC) ] {
-          set env(POW_LIBRARY) "$FITSVIEWER_LIBRARY/../pow"
-          set  env(POW_HELPDIR) $env(POW_LIBRARY)
-          load [glob $FITSVIEWER_LIBRARY/../libfitstcl.{s\[ol\]*,dylib,dll}]
-          load [glob $FITSVIEWER_LIBRARY/../libpow.{s\[ol\]*,dylib,dll}]
+          package require fitsTcl
+          package require POW
       } else {
 	  if ![info exist env(FV_HELPDIR)] {
 	     set fullname [info nameofexecutable]